Le MINISTERE de 1 ‘EDUCATION du QUEBEC expose, . 
de facon détaillée, Le programme tudes au SECONDAIRE 
de la science de l'informatique d le DOCUMENT 16—0081: 
"INTRODUCTION à 1а SCIENCE de 1'INFORMATIQUE" (ISI) 


Les VOLUMES 1 et 2 de 
sont conformes au doc 
contie 1 

avec les reference 


consacrée au C64 
el et le VOLUME 2 
du programme "ІЗІ" 

pages de ces 2 volumes. 


Une solution e ao өг pour chacun des projets présentés 
dans ces 2 volumes. Les programmes contenus dans ces volumes 
utilisent uniquement les [commandes], les [fonctions] et les 
Linstructions] BASIC ayant été apprises dans les pages qui 
précèdaient ces programmes...sauf quelques exceptions qui 
Aem - ^ n + | - “н P 4 2 - 4 D 
donneront le goût "d'attaquer" le chapitre suivant! 


Aprés chaque chapitre, les élèves feront une liste de 
projets qu'ils aimeraient réaliser...Ils en discuteront entre 
eux et avec le professeur...Il est normal que certains projets 
intéressants soient retardés ou construits par modules en 
suivant les étapes d'apprentissage de 1а programmation. 
D'autres projets seront "mis sur les tablettes"...L'important 
est de conc un оч des projets imaginés par les 
élèves.,.De l'imagination, ils en ont "à revendre"! 


Far exemple les élèves pourraient réaliser un projet 
(statique) à la fin du chapitre un et conserver ce dessin sur 
cassette ou sur disque. Reprendre ce projet pendant l'étude du 
chapitre deux afin de l'animer... 


E 


Une remarque роце compléter ces quelcdques lignes 
d'introduction. Le Ministère de l'Education prévoit dans son 
programmes 
a) Connaitre le fonctionnement matériel et l'histoire 

de l'ordinateur 
b) Evaluer la place et le rôle de l'ordinateur dans la société 
c) Développer des attitudes critiques vis-à-vis du traitement 
automatique de l'information 


Мете si cette partie du programme est traitée dans le 
chapitre Š du volume 2, ces notions ne devront en aucun Cas 
re donnnées à la fin de l'année scolaire dans un cours "ex 
cathédra" et in extremis!... 


Ces notions seront planifiées et offertes aux moments 
opportuns au cours de l'année...et par petites doses de 5 ou 10 
minutes (maximum), 
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UN DEPART 


La publicité n'exagère pas lorsqu'elle affirme: "Rien ne 
peut battre mon COMMODO 64". Rien'...c'est-à-dire aucun autre 
ordinateur actuellement sur le marché ne peut offrir à un prix 
comparable les étonnantes possibilités du Có4 


Tu as fait un bon investissement et tu as raison d'en étre 
fier car le C64 est un ordinateur "bien racé" qui profite d'une 
percée technologique importante avec son  synthétiseur de 
musique. Son microprocesseur est le 6510 en fait c'est le 
célèbre 6502 auquel on a ajouté des "BUS". 


Le C64 est plus difficile à programmer que le VIC-20 mais 
tu constateras rapidement que ce livre rend simple ce oui 
paraissait compliqué. Tu apprendras à construire des "SPRITES" 
dès les premiers chapitres afin de profiter de cet outil 
merveilleux pour l'animation de tes programmes. 


Le C64 n'est pas seulement musicien et décorateur, il peut 
calculer tes problèmes de math (au primaire ou à l'université), 
établir des statistiques, tracer des courbes trigonomé- 
triques...organiser ton budget... Il est trés efficace dans 1а 
correction des programmes, le traitement d'un texte ou de tout 
un volume comme celui que j'écris présentement à l'aide du 
logiciel "Paperclip". 


Son clavier possède 64 touches dont une quarantaine 
offrent un choix de Z caractères et тете 4 caractères pour 
chacune des touches des chiffres 1 à 8... On peut dire que le 
C64 а "du caractère" et c'est sa "force de frappe" face à ses 
concurrents! 


Quand tu mets le С64 et la TV (ou moniteur) sous tension, 
l'écran affiche: 


++ COMMODORE 64 BASIC VE xxx 


64K RAM SYSTEM 38911 BASIC BYTES FREE 


La première ligne indique que le C64 offre la version 2 de 
BASIC. 


La deuxième ligne te dit qu'il y a 646 ou 64 fois 1024 
(65555) mémoires dans le C64 pour le 'SYSTEME' et pour les 
mémoires vives (anglais:RAM) et que 28911 octets (anglais: 
bytes) sont libres (FREE) c'est-à-dire qu'ils sont disponibles 
pour écrire tes programmes. 


READY t'informe que le C64 est pret à recevoir tes 
instructions, Le curseur est le petit rectangle qui clignote. 


Un octet contient 8 bits ou 8 unités d'information. Chaque 
bit peut prendre deux états: soit l'état О ou l'état 1. 


Exemple: [5 Loo D E ү. ol (Voir chap. 2 pour plus 
Y d'informations) 
64 +4 +2 = 70 


Cet octet est le profil binaire de la lettre car le code 
de ce caractère F est 70 (voir tableau page 76). 


Chaque caractère, même le caractère espace, demande 1 
octet. Tu peux donc entrer environ 28900 caractères dans 1а 
mémoire de ton (С64... soit à peu près l'équivalent d'une 
douzaine de pages de ce volume. 


Ces 28911 octets forment une partie de la MEmoire Vive 
(МЕУ) c'est-à-dire des mémoires dans lesquelles tu peux lire ou 
écrire. (anglais: RAM) 


Le 'SYSTEME' (Kernal) du C64 est formé de MEmoires Mortes 
(MEM), еп anglais (ROM), qui contiennent les programmes 
invariables que le constructeur a conçus pour permettre à 
l'utilisateur un échange interactif avec son Có4. 


N'oublie pas que les ordinateurs ne comprennent que le 
langage machine ou binaire. L'interpréteur BASIC est un de ces 
programmes utilitaires (en mémoire morte) qui transforme еп 
binaire les caractéres que tu tapes sur le clavier. 


Télévision (ou moniteur) 


TM ECRAN CADRE FOND de l'écran (bleu foncé à l'état normal) 
bleu clair à l'état normal) 


Le FOND de l'écran (partie active) 


Le FOND de l'écran (i.e. la partie active) est divisé en 
25 rangées (0-24) et en 40 colonnes (0-59). Tu te rappelleras 
que les numéros des rangées et des colonnes commencent par О et 
non par i. Се qui fait un total de 1000 petites cases ayant 
les dimensions du curseur. La lettre F a été tapée sur 1а 
rangée 20, colonne 27. 


EXERCICE 1  Appuie sur la touche CRSR(bas) et sur la touche 
CRSR(droite) pour amener le curseur à la rangée 20, colonne 27 
et tape le caractère F. 


L'information est immédiatement  codée өп binaire par 
l'interpréteur et le Có4 affiche 1а lettre F selon les 
coordonnées (20,27). Autrement dit le Có4 allume les points 
qui tracent le dessin de 1а lettre F à la case (20,27). 


Agrandissement (8 fois) 
de la case (20,27) ci-dessus 


Chacune des 1000 cases du FOND de l'écran 
est formée de 64 autres cases aussi 
petites que la pointe d'un crayon. C'est 
pourquoi оп dit que chaque case est 
formée de 64 points (anglais: dots). 


е caractere Ез couleur bleu clair (20 
points sont allumés) 

ond de l'écran de la case (20,27): 
couleur bleu foncé (44 points sont 
éteints) 


Оп dit qu'un point est éteint quand il est de 1а couleur 
qui a été choisie pour le FOND de l'écran (Ici c'est le bleu 
foncé, état normal du C64). 


ul 


On dit que les points des caractères sont allumés quand 
ils sont de la couleur déterminée par la zone mémoire 
commençant à l'adresse 55296 que nous verrons plus loin. Quand 
la couleur n'est pas déterminée, les caracteres ont la Couleur 
bleu clair (état normal du C64). 

Le FOND de l'écran possède donc 64000 points (1000 X 64), 
Chacun de ces points est codé sur un bit qui peut étre allumé 
Ou éteint: bit à O pour "éteint" et bit à 1 pour "allumé". 


Les caracteres inversés: 


Il est important, dès le début de notre étude, de savoir 
ce qu'on entend par "caractères inversés", 


Nous utiliserons souvent l'inversion des caractères pour 
attirer l'attention sur un mot ou une lettre. 


Le caractere F inversé 


Dans la case oü se trouve un caractere 
inversé, ce sont les points du caractere 
qui sont éteints (couleur bleu foncé du 
fond de l'écran). 


Tous les autres points sont allumés 
(couleur bleu clair dans l'état normal du 
C64). 


EXER E 2: 


a) Tiens la touche SHIFT enfoncée et appuie sur les touches 
CRSR (haut) et CRSR (gauche) pour amener le curseur sur la ligne 
18, colonne 27. 


b) Appuie simultanément sur la touche CTRL еб sur la touche 
RVSon (chiffre 9). N'oublie pas que la touche CTRL doit étre 
enfoncée pendant que tu appuies sur RVSon. 


c) Tape 1а lettre F et tu obtiendras le caractere F inversé. 
Appuie sur d'autres touches et l'écran affichera encore des 
caracteres inversés. 


QUESTION 1 Comment revenir à l'état normal? 


Réponses Fendant que tu tiens la touche CTRL enfoncée, appuie 
sur RVSoff. 


QUESTION 2 Combien y a-t-il de bits allumés dans le rectangle 
qui clignote (curseur) lorsqu'il apparaftt sur l'écran? 


Réponses Tous les 64 bits sont allumés. 

QUESTION Ж Le curseur apparaît sur l'écran pendant 1/3 de 
seconde et devient invisible pendant 1/5 de seconde. Combien de 
bits demeurent allumés quand le curseur devient invisible (bleu 


өше fond bleu)? 
Réponse: Tous les bits sont à О (éteints). 
EXERCICE 3 Inversion du caractère espace: 


Appuie quelques fois sur la barre d'espacement (la longue 


touche rectangulaire en bas du clavier). Tu viens d'afficher 
quelques espaces sur l'écran mais ces espaces sont invisibles 
parce que tous les bits du caractère espace sont à 0 (couleur 


du fond de l'écran: bleu sur bleu), 


Maintenant tu vas allumer le caractère espace. Tiens la 
touche CTRL enfoncée pendant que tu appuies sur RVSGon. 


C'est fait! Le caractere espace est maintenant bleu clair 
(couleur des caractères dans l'état normal du C64). 


Appuie la barre d'espaces et l'écran affichera une longue 
bande bleu clair. Оп dit que le caractère espace a été inversé. 
On utilise régulièrement ‘l'espace inversé’ pour dessiner des 
silhouettes. 


Remets le Có4 à l'état normal: KVSoff (Voir 1а question 
TT. 


EXERCICE 4 Obtention des couleurs: 


Sur la partie verticale des touches 1 à 8, tu peux lire 
l'abréviation anglaise de В couleurs: 


1= BLK = noir 2- WHT = blanc 5- RED = rouge 
4- CYN = turquoise 5- FUR = pourpre 6- GRN = vert 
7- BLU = bleu 8- YEL = jaune 


Dessine la drapeau francais (bleu blanc rouge) en 
utilisant le caractère espace inversé. Note: Le drapeau se 
trouvera suspendu en position verticale (hampe horizontale et 
en haut de l'écran 


SOLUTION 

а) Il faut d'abord "effacer" l'écran.  Appuie simultanément sur 
la touche SHIFT et sur la touche CLEAR HOME. L'écran se vide 
et seul le curseur se trouve sur l'écran, en haut à gauche. On 
dit que le curseur est à l'origine, aux coordonnées (0,0). 


b) Comme le fond de l'écran est déjà bleu foncé, tape 8 fois 
sur CRSR(bas) pour descendre le curseur de 5 rangées 


c) Appuie simultanément CTRL et  RVSon pour obtenir des 
caractères inversés et simultanément CTRL et chriffre 2 pour 
obtenir le 'blanc'. 


d) Appuie la barre d'espaces et laisse dérouler le trait blanc 


k= 


sur Š lignes d'écran. Notes Quand tu veux effacer derrière le 
curseur, tu appuies la touche INST DEL. 


e) Le Có4 est toujours à l'état RVSon depuis l'étape c). 
Appuie simultanément sur la touche CTRL ей la touche RED 


(chiffre Ж). Appuie ensuite la barre d'espaces jusqu'à ce que 
tu obtiennes 5 lignes de couleur rouge. 


UN SPRITE (définition) 


Un Sprite est un dessin que tu construis toi-méme et que 
tu introduis dans la mémoire du С64 pour l'afficher ensuite 
n'importe ой sur l'écran sans que les caractéres produits par 
les touches du clavier soient effacés 


Les dimensions d'un SFRITE 


Tu as appris, à la page 6, que le fond de l'écran est 
formé de 64000 petits points (anglaissdots) 
Largeur de l'écran: 40 fois В = 520 points 
Hauteur de l'écran: 25 fois 8 = 200 points 
Surface de l'écran: Z20 multiplié par 200 = 64000 points 


— с үти ui d'un SPRITE: 
EE — 


5 fois 8 = 24 points 


< 
LI 


Hauteur d'un SFRITE: 
(2+5/8) fois 8 = 21 
points 


Surface d'un SFRITE: 
24 fois 21 - 504 
points 


JETTE UN REGARD sur la page 21 et tu auras 
une idée des dimensions réelles d'un Sprite en 
comparaison avec les dimensions réelles du fond de l'écran (TV 
56 cm ou 14 pouces) 


L'ORDINATEUR pourra doubler les dimensions d'un sprite si 
tu lui donnes 2 petites instructions (chapitre 2 p.55) 


EXERCICE 5 Utilise le dessin quadrillé ci-dessus (24X21) pour 
en faire plusieurs calques et, à l'aide de ces calques, dessine 
un nuage et une "Miss ӨРКІТЕ" 


Tu as une solution  ci-dessous...Les dimensions des 2 
dessins sont environ 3 fois plus grandes que les dimensions 
normales d'un sprite (sur écran 360 cm). 


[ i ' 
Ехетріе d'un! nuage Tu peux embellir notre 
(nimbo-stratus) Miss SFRITE! 


AU CHAPITRE 2 tu apprendras comment introduire ces sprites 
dans la mémoire de ton C64 pour ensuite les afficher et les 
déplacer sur l'écran. En attendant, mets tes dessins en lieu 
sür!... 


LES X MODES DE FONCTION DU C64 


ї= CE MODE DIRECT 


Dans le mode direct, les instructions que tu donnes au C64 
sont exécutées aussitôt que tu tapes la touche RETURN. 


Avant de faire l'exercice 8, je te signale que les 
parenthèses s'obtiennent еп appuyant simultanément sur la 
touche SHIFT et sur les chiffres 8 ou 9. 


EXERCICE 6 Ecris en mode directs (maximum 2 lignes sur écran); 
FOKE S3281,1:PFRINT CHR£(GGL47):s:FOR Ісі TO 200:РКІМТ СНКЖ(18) 
CHRE (2); sNEXT I 


Le curseur se trouve positionné après NEXT I. Ne le 
déplace pas afin d'étre sûr qu'il est dans la "ligne BASIC", 


Tape la touche RETURN et l'écran affichera la bande bleue 
du drapeau de la France sur un FOND blanc. 


Si le Có4 te signale une erreur, ne t'en fais pas! Ecris 


de nouveau la ligne еп t'assurant que tu tapes les bons 
caractères. Ме pas confondre le chiffre O qui est traversé par 
un trait oblique (sur l'écran) et la lettre O! 


EXERCICE 7  Ecris en mode direct: 
PRINT 200-50+25 Tape RETURN. L'écran affiche 175. 


Nous aurons l'occasion plus loin d'expérimenter ce mode 
direct dans des calculs plus complexes tout comme avec une 
Calculatrice. 


Le mode direct est utile pendant l'élaboration d'un 
programme... et chaque fois qu'on veut obtenir un résultat 
immédiat qui ne doit pas étre conservé. 


Il faut te rappeler qu'en mode direct, tes instructions ne 
peuvent pas être récupérées lorsqu'elles disparaissent de 
l'écran. 


EXERCICE В Ecris en mode direct: (sur 2 lignes d'écran) 


FOR Ізі TO16:FOKE 55280,1:ҒОК Ј=1 TO16sFOKE 55281,0: 
FORT-1TOSOO0: NEXT: NEXT: NEXT 


RETURN...Tu obtiens les couleurs du cadre et de l'écran. 
2- LE MODE FROGRAMME (ou différé) 


Le mode programmé possede toujours un numéro au début de 
la ligne BASIC. De plus, même si ton programme n'est plus sur 
l'écran, tu peux l'afficher de nouveau au moyen de la commande 
LIST: 


N'oublie pas de taper RETURN après chaque ligne BASIC. 


EXERCICE ? Ecris le programme suivants 


10 PRINTCHR£(147)::POKE 5Z281,15 

20 FORI=iT0200:FRINTCHRE(18)CHRE(31)CHRE(32);:NEXT 
30 FORJ=1T0200:FRINTCHRE (5) CHRE (82) § s NEXT 

40 FORE=1TO200: FRINTCHRE (28) СНК (32) f NEXT 


Au lieu des numéros 10, 20, 30,...tu peux écrire 1, 2, 
5,... Cependant, il est conseillé de laisser des numéros libres 
afin de pouvoir insérer d'autres instructions pendant la 
construction d'un programme plus élaboré. 


Ton petit programme est dans la mémoire du C44. 
Ecris RUN et appuie RETURN.  L'exécution du programme commence. 


А la fin, l'écran affiche le drapeau de іа France 
(position verticale), le méme résultat que tu as obtenu en mode 
direct à l'exercice 4. 


EXERCICE 10 Au-dessous de READY, là où le curseur clignote, 
ajoute ces lignes 15 et 16 à l'exercice 9 pour 
dessiner une hampe et 4 attaches...: 


15 FÜRLe1TU48:PRINTCHRf51G32CHRECI442CHREC3O2»; NEXT: PRIMTCHREGCLI4E); 
LE FORMe1TUA:PRIMT "1",:HMEXT 


Si tu veux afficher la liste de ton programme sur l'écran: 
Ecris LIST et tape RETURN. Four faire exécuter de nouveau ton 
programme, écris RUN et tape RETURN. 


Avant de commencer le chapitre UN, fais cet exercice: 


EXERCICE 11 Ecris ce programme et relis chacune des lignes 
pour vérifier s'il ne manque pas un caractère, une 
parenthése, un signe... N'oublie pas de tourner 
le bouton volume de la TV! 


10 PRINT CHR¥ (147): X=17: 8554272: РОКЕ 55281,1: POKE 8424,15 
20 FOR I-1 TO 8: READ HF,BF: H(I)-HF: B(I)=BF: NEXT I 

Z0 POKE 845,88: POKE 846,89 

40 E=INT (RND (1) #1000) 

45 C=INT (RND (1) #16) 

SO N=INT (RND (1) #8+1) 

55 F=INT (RND(1)#18+16) 

60 IF F=33 OR F=i7 THEN X=F 

65 POKE S-1,H(N): POKE 5,80) 

70 POKE 10244E,B81-C: FOKE 55296+E,C 
75 FOKE S-4,X: FOR Tel TO 250: NEXT T 
ВО POKE S*4,X-1: FOR Т=1 TO 50: NEXT T 
85 GOTO 40 

90 DATA 17,57,19,05,21,154,22,227 

95 DATA 25,177,28,214,22,94,24,75 


pour arreter le programme, 
appuie simultanément la 
touche RUN/STOF et la 
touche RESTORE 


Dans ce programme, les valeurs des variables sont choisies 
au hasard (RND): 1- le caractère (un des numéros 81 à 96 page 
76) 2- sa position sur l'écran (О à 999) 3- sa couleur (О а 
19) 4- la note musicale (Do-4 à DO-5) 5- forme de l'onde (17 


ou 33). 


LES INSTRUCTIONS BASIC QUE TU AS utilisées DANS CES PAGES 
D'INTRODUCTION seront expliquées DANS LES CHAFITRES SUIVANTS. 


Avec de 1а patience, de 1а ténacité et beaucoup 
d'exercices, tu pourras réaliser toi-même d'intéressants 


programmes quand tu auras terminé l'étude pratique de ce 
premier volume. 


EON COURAGE! 


11 


CHAPITRE I 


[ACTIVITES DIRIBEEB: Série No 1 
BUTS: Cette première série d'activités a pour but de te 


EN 


familiariser avec: 
les instructions FRINT et GOTO 


les commandes LOAD, NEW, RUN, SAVE, VERIFY, LIST 


les deux touches majuscules SHIFT 
la touche Commodore (embléme de Commodore) 


1 
les 2 touches du curseur CRSR[ avec «СКК | avec 


SHIFT SHIFT 


et (ERSR] sans sans 
U 


SHIFT SHIFT 


la barre d'espacement E ] En appuyant sur 
cette barre tu mets un blanc (un espace) sur l'écran... 
Donc tu effaces vers la droite 


la touche qui permet d'effacer vers la gauche sans 
SHIFT 


les caractères graphiques 


la touche qui emmagasine en mémoire 


où exécute une ou des instructions RETURN 


10- enfin, sur les 11 CARACTRES DE COMMANDE D'AFFICHAGE, tu еп 
apprendras six: voir page 35 numéros 1, 7, 8, 9, 10, 11. 


(PRINT) 

Il n'y a pas d'instruction en BASIC qui présente autant de 
variétés d'applications que l'instruction PRINT. Il faudra que 
tu lui  apportes une attention spéciale et que tu fasses 


beaucoup d'exercices pour profiter de toutes les possibilités 
que cette instruction peut t'offrir. 


EXERCICE 1 Ecris en mode direct: (pas de numéro de ligne) 


PRINT 100*4/2425 Tape RETURN 
* est le signe de la multiplication 
/ est le signe de la division 


L'écran affiche 225. Nous verrons plus loin les autres 
symboles mathématiques. 


Le mot anglais РБІМТ (imprimer) devrait en principe 
imprimer les résultats sur une feuille au moyen d'une 
imprimante, Et le mot ISFLAY (afficher) devrait servir 
d'instruction pour afficher les résultats sur un écran.. Avec 
l'avénement des moniteurs et TV, on a préféré conserver, pour 
des raisons historiques, le méme mot FRINT pour dire "imprimer" 
et "afficher". Dans ce volume nous emploierons indistinctement 
imprimer ou afficher. 


EXERCICE 2 Ecris en mode direct: 
FRINT"RON COURAGE!" et appuie RETURN 


L'écran affiche tous les caractères placés entre les 
guillemets. 


i- Instruction PRINT avec ou sans quillemets 


Quand le C64 rencontre une instruction FRINT, il se trouve 
en présence de 2 choix. Il se demandes: est-ce qu'on veut que 
j'imprime des caractères ой si оп veut que je fasse des 
calculs? C'est toi qui vas indiquer après PRINT le choix que 
l'ordinateur fera. 


а) Бі tu mets des caractères entre guillemets, le C64 affichera 
intégralement l'information contenue dans ces guillemets: les 
chiffres, les espaces, les lettres, etc... 


b) S'il n'y a pas de guillemet après FRINT, le C64 saura qu'il 
doit faire, soit un calcul avec les chiffres, les fonctions ou 
les lettres qu'il considérera comme des variables numériques, 
ou soit imprimer une chaîne de caractères si la variable 
possède le signe dollar (Nous parlerons plus tard de ces 
variables avec #). 


EXERCICE 5 Ecris en mode direct: 


Ki 


PRINT "18 MAI" RETURN 


L'écran affiche 15 MAI. Donc l'ordinateur imprime 
exactement ce qu'il découvre entre les parentheses. 


EXERCICE 4 Ecris en mode direct 
FRINT 15 MAI RETURN 


L'écran affiche 15 0. Comme il n'y a pas de guillemet, 
le C64 veut exécuter un calcul et il t'indique que la variable 
МАТ vaut O. Il faut noter qu'il y а deux espaces entre 15 et 
O: un espace après 15 et un espace avant ©. 

L'ordinateur met automatiquement un espace avant et après 
les nombres. бі le nombre est négatif, l'espace avant sera 
remplacé par le signe ~. 


EXERCICE 5 Ecris en mode programmé (il faut un numéro de ligne) 


10 A = 10 * 5 
20 PRINT"VALEUR DE A ="A 


L'écran affiche: VALEUR DE А = 50 Four faire exécuter 
un programme il faut d'abord écrire RUN et ensuite appuyer 1а 
touche RETURN pour que ta commande RUN puisse passer dans 1а 
mémoire du C64. 


Dans l'instruction 10 tu demandes ceci au С64: multiplie 
10 par 5 et mets le résultat dans la Variable А. A 
l'instruction 20, tu lui demandes: affiche les caractères 


placés entre les guillemets et imprime la valeur contenue dans 
la variable А. 


2- Al viati de l'instruction PRINT 

Il est temps que tu apprennes que PRINT peut étre remplacé 
par un symbole très court: le [2] . Tu vas sauver du temps еп 
tapant un seul caractère au lieu de 5. 


ligne et les anciennes instructions 10 et 20 s'effaceront 
automatiquement de la mémoire du C64 pour étre remplacées par 
les nouvelles. 


EXERCICE 6 Ecris en mode programmé 
10 À = 10 * 5 
20 7 "VALEUR DE ñ =" А (RUN et RETURN) 

Tu obtiens les mémes résultats... Maintenant, vérifie si 
le Có4 a bien inscrit  FRINT dans sa mémoires Appuie 
simultanément SHIFT et CLR НОМЕ pour effacer l'écran. Ecris 
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Le F] est bien remplacé par PRINT! 


Four effacer l'ancien programme de la mémoire tu écris NEW 
et appuie RETURN. 

Tu peux vérifier ensuite que la mémoire BASIC est vide; 
écris: LIST et appuie RETURN. Il n'y a aucune instruction sur 
l'écran entre LIST et READY. Ecris RUN et RETURN... Le C64 
affiche seulement le mot READY. 


QUESTION 1 Les instructions 10 et 20 sont demeurées en haut de 
l'écran, pourquoi? 


Réponses NEW n'efface pas l'écran.  Frofites-en pour faire une 
expérience: 


Remonte le curseur sur la ligne 10 en appuyant sur  SHIFT 
et la touche CRSR(haut). Tape ensuite RETURN. 


Le curseur s'est positionné automatiquement sur la ligne 
20. Tape encore sur RETURN. Ton programme est de nouveau en 
mémoire car un des rôles de la touche RETURN est d'emmagasiner 
les instructions dans la mémoire du Có4.  Ecris RUN et RETURN 
et tu verras tes résultats de nouveau sur l'écran. 


3— Rôle des caractères al et ІН dans les instructions FRINT 


Les caractères virgule B] et point virgule [z] sont utilisés 
comme indicateurs dans une instruction PRINT. 


a) La virgule indique à l'ordinateur que tu veux faire imprimer 
tes résultats sur 4 sections de l'écran: colonne О, colonne 10, 
colonne 20 et colonne 20 (note: automatiquement colonnes 
1,11,21 et 31 pour les chiffres afin d'avoir une case Libre 
pour un éventuel signe ~ ). 


EXERCICE 7 Ecris en mode programmé 


10 PRINT -1,4,-6,8 
20 PRINT "MOINS UN","QUATRE","MOINS SIX","HUIT" 


L'écran affiche: |-і 4 -6 8 
MOINS UN QUATRE MOINS SIX HUIT 


Tu peux mettre un maximum de 9 caractères par section...8i 


tu dépasses cette valeur, le C64 n'imprimera rien sur la 
section suivante 


EXERCICE В Ecris en mode programmé 
10 PRINT "JE","DEMEURE" , " AMICALEMENT" , "VOTRE" 


Le mot VOTRE n'a pas été imprimé sur la 4iëme section 
parce que AMICALEMENT possède plus de 9 caractères. 


b) Dans une instruction PRINT, le point virgule indique à 
l'ordinateur qu'il doit imprimer la valeur suivante 
immédiatement derriére la valeur précédente. Autrement dit, les 
valeurs s'impriment les unes à la suite des autres. 

Remplace les 3 virgules de l'exercice B par des points 


L'écran afficheras JEDEMEUREAMICALEMENTVOTRE 


Il faut donc introduire un caractère espace à la fin des 
trois premiers mots, avant de fermer les guillemets 


EXERCICE 9-А  Ecris en mode programmé 
10 FRINT "JE ";"DEMEURE "e "AMICALEMENT "3 "VOTRE" 


EXERCICE 9-B Maintenant que tu connais le róle de la А et du Îş] 
tu peux écrire simplement: 

10 FRINT "JE DEMEURE" 
20 PRINT 
ЗО PRINT "AMICALEMENT VOTRE" 

Une instruction qui contient seulement le mot PRINT 
imprimera une ligne vide (passera une ligne). C'est souvent 
utile pour aérer un texte. 


Avant de passer à l'instruction GOTO, fais ce petit dessin 
à l'aide des caractères graphiques qui se trouvent sur 1а 
partie verticale des touches du clavier (note: le (564 se 
chargera de fermer automatiquement les guillemets). 


EXERCICE 10 — 

D PRIMTCHREGLI4? vec FRINT 1а fonction 
10 PRINT" М HR£€£(147) permet 

24 FRIMT" Z ^il 'effacer l'écran. 

за PRIMT" L. # pir.chapitre III. 


4 PRINT" o o 
Explications 


Ligne 10: après avoir ouvert les guillemets, tu mets 2 espaces, 
tu appuies SHIFT et М, 2 fois @ et Т, SHIFT et M. 

Ligne 20: 1 espace, SHIFT et N, 4 espaces, SHIFT et P. 

Ligne ЖО: 1 espace, SHIFT et L, 4 fois Commodore et ё, 
Commodore ett, 

Ligne 40: 2 espaces, SHIFT et А, 2 espaces, SHIFT et W. 
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Гвото| (ou во TO) 


L'instruction GOTO est une instruction de branchement 
inconditionnel. Dans се cas l'exécution du programme est 
renvoyée au numéro de ligne qui est spécifié après GOTO. 


EXERCICE 11 


à PRINT” W”; Four arréter le programme 
20 GES ій SE la touche RUN/STOF 

Le caractere ІҢ fait imprimer les étoiles les unes à la 
suite des autres. L'instruction GOTO 10 fait recommencer 


indéfiniment l'exécution du programme. 


Je te conseille d'organiser tes programmes de façon à 
limiter le plus possible l'emploi de l'instruction GOTO... 
Ainsi il sera plus facile de faire une lecture séquentielle de 
tes programmes. 


EXERCICE 12 


5 PRINTCHR#C 1473 ; 
T b 1 i t 
18 PRINT" ht (Ы obtiens les traits u 


Ë E 4 р obliques en appuyant 5 
28 و‎ t les touches N ou M. 


Ici GOTO retourne au numéro de sa propre instruction. Le 
programme "tourne en rond" dans la ligne 20 et empéche ainsi le 
C64 de faire apparaftre le mot: READY et le curseur 


Quand un programmeur construit un dessin sur l'écran, il 
utilise cette technique pour  empécher le mot READY d'en 
détruire une partie. Il efface ensuite cette instruction car 
il est interdit, en principe, de laisser une boucle  infinie 
dans un programme! 


Nous utiliserons cette technique dans nos projets de ce 
chapitre I. Four revoir READY et le curseur, appuie la touche 
RUN/STOF. 


Les 11 Caractères de COMMANDE D'AFFICHAGE 


Les 11 caractères de commande d'affichage sont illustrés 
et expliqués dans l'important tableau de la page 35. Ils sont 
numérotés et ce sont ces numéros de référence que nous allons 
utiliser dans ce volume. 


Il est important que tu deviennes un "champion" dans 
l'usage de ces caractères car ils possèdent d'étonnantes 
possibilités d'édition. Nous allons faire quelques exercices 
avec les numéros 1, 7, 8 que tu auras à utiliser dans tes 
projets de ce premier chapitre. 
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EXERCICE 13-A Ecris en mode direct: 


XE Four obtenir ce caractere tu tieng la 
PRINT" touche SHIFT enfoncée et tu appuies 
sur CLR/HOME(voir no 1 page 35). 


Tape RETURN. Ти constates que ce caractère de commande 
affichage efface l'écran. Son symbole est un coeur. en 
t: е 


EXERCICE 13-B Ecris en mode direct: 


Я Four obtenir се caractère tu tiens la 
РЕІНТ IT IMVACANCES touche CTRL enfoncée et tu appuies 
sur RVSon (voir no 7 page 35). 


Tape RETURN. Le mot VACANCES apparaît en caractères 
inversés. Le symbole de ce caractère de commande d'affichage 


est un R en contraste inversé. Une nouvelle instruction PRINT 
remet automatiquement le С64 à l'état normal (RVSoff). 


EXERCICE 13-C Ecris en mode direct: 
РКІНТ" ЖУТУЕШ LES МУНСННОЕВ 


Le caractère placé après VIVE s'obtient en appuyant à La 
fois sur CTRL et RVSoff (voir no 8 page 35). 


Tape RETURN. Le mot VIVE s'imprime en contraste inversé, 
le mot LES revient à l'état normal parce qu'il est précédé par 
le caractere de commande d'affichage no 8 et VACANCES s'imprime 
en contraste inversé. 


Le symbole de ce caractère no 8 est un rectangle еп 
contraste inversé qui possède une ligne éteinte (ici une ligne 
blanche) sur l'avant dernière rangée. 

Il faut t'exercer à reconnaître rapidement ces symboles de 
commande d'affichage dans la liste d'un programme. Ces symboles 
sont plus difficiles à lire si tu utilises l'imprimante 1525 
qui imprime ses caractéres dans une matrice de 42 points (6 X 
7) tandis que sur l'écran tu sais déjà que la matrice d'un 
caractère possede 64 points (В X 8). 


Voici quelques précisions concernant les caractères 
graphiques avant de faire l'exercice 14. TU as remarqué que 
plusieurs touches possèdent 2 caractères graphiques sur 1а 


partie verticale avant de ces touches. 


Frenons l'exemple de la touche étoile: 
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TC REA 
Le caractère de gauche est un triangle ыш; 
rectangle blanc placé dans une petite 

case qui symbolise une саве de 

l'écran. C'est ce triangle qui s'im- 

primera dans l'état normal du Có4. 

Four obtenir le triangle opposé ---> 

il faut mettre le C64 en RVSon. 


Il en est ainsi pour le caractère de droite. А l'état 
normal du Có4, l'écran affichera la ligne horizontale au milieu 
de la case et tous les autres points seront  éteints. Avec 
RVSon tu auras le caractère inversé: 1а ligne horizontale du 
milieu sera éteinte (couleur du fond de l'écran) et tous les 
autres points seront allumés (état normal: bleu clair. 


Pour afficher le caractère graphique de gauche, il faut 
tenir la touche Commodore (C) enfoncée... 


Four afficher le caractère graphique de droite, il faut 
tenir la touche SHIFT enfoncée... 


EXERCICE 14 Fais l'exercice suivant et (n'oublie pas de taper 
RETURN apres chaque ligne 


10 PRINT" p 
20 PRINT" п amm" uem 
за PRINT" `Q BS |" E 

40 PRINT" | gem Pai 


50 PRINT "ШЕ" 


Ти ав toutes les connaissances nécessaires pour construire 
ce petit dessin... 


Les deux h CRSR 


Ce sont deux touches importantes qui permettent de 
déplacer le CURSEUR dans les 4 orientations: EST, OUEST, NORD, 
SUD. Autrement dit: à droite, à gauche, en haut, en bas. 


Il у а des flèches sur les touches  CRSR pour t'indiquer 
l'orientation. Le déplacement du curseur vers le bas et 
vers la droite se font simplement en appuyant sur la touche 
CRSR (sans SHIFT). 


Les déplacements vers le haut et vers la gauche 
exigent que tu appuies d'abord sur SHIFT. 


EXERCICE 15 


Examine d'abord la page 21. Elle a les dimensions 
du fond de l'écran d'une TV 36 cm (14 pouces). Donc chacune 
des 1000 cases a les dimensions réelles du curseur. Tu pourras 
faire plusieurs calques de cette page et les utiliser pour 
préparer tes dessins. 
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É ле le curseur vers le centre de l'écran et fais-le 
cheminer selon le tracé indiqué à la page suivante, 


Repars d'un autre endroit de l'écran et refais plusieurs 
се... Il faut que tu mattrises "les contrôles 
aisément que le bras des vitesses d'une auto! 


fois 
Cur seu s" 


lmprii pendant que tu déplaces le curseur sur 


un chemin rectangulaire. 


& 


Enfin, utilise la touche INST DEL SHIFT pour effacer 
qui forment les contours de ton triangle. 


Photo du sous-programme "Fleur de Lis” , page 158 
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b) 


E 


а) 


“Indique les charges négatives et une bonne mise à la terre 
-Installe une lampe sur le coin gauche de la maison 
-Ajoute un soleil au-dessus de la maison. Au chapitre 2 tu 


introduira un SPRITE (nuage) 


Entre ton dessin dans un programme par la METHODE des 
instructions FRINT. 


Fais exécuter ton programme en écrivant RUN. 


Sauve ton programme sur cassette ou disquette et vérifie 
s'il est bien implanté sur 1а bande magnétique. 


A la page suivante, tu as un exemple de réalisation du 


projet А-1. Ти pourras faire mieux! 


M 
3 


Voici се que pourrait donner ton programme après avoir 
écrit RUN et appuyé sur RETURN. 


ысу 
-- 
⁄ м 


. Programme A-1 


sur l'imprimante VIC-1525 


C'est plus joli sur l'écran 


Si tu écris LIST et appuies sur RETURN tu obtiendras le 
listing de ton programme. 


` Listing du programme А--і 

1000 PRIIMTI 

1005 POKE 5228й,15: POKE 53281,1: PRINT CHR$C312 

180180 PRIHT 

18015 PRIHT" Nf N'oublie pas de 
ійгй PRIHT" س‎ — taper RETURN 
1025 PRINT” ғы à la fin de 
18380 РЕІНТ:РЕІНТ chaque ligne 
1444 FRINT" Ф 

1050 PRINT" СЕС 

1068 FRIHT" ман erm MS 

1@7@ PRINT" # жее 

ійей PRIHT" ” ч, 

1090 РЕІНТ" # Mo 

1144 PRIHT" ТЕТЕП 

1119 PRIHT" езі — 
1120 PRIHT" ө | 

1130 PRIHT" | 

1140 PRIHT" | 

1150 PRINT” 1 

1160 PRINT" і 

1170 PRIHT" s NIS CAES 
1188 PRINT" [| Ka? 
1198 PRINT" 
1200 GOTO 12060 


Notes: 1- Chaque ligne du programme est en fait listée sur deux 
lignes, c'est pourquoi le dessin a cette forme allongée 
2- Le document qui présente la liste complète des 


instructions d'un programme s'appelle: le listing (mot anglais 
francisé) 


£4 


ы 


REALISATION 


"C'est à ton tour de...' 


Première étape 
Commence par effacer L'écran (voir no 1 page 355) 


“Trace ton dessin selon tes goüts et ton talent d'artiste en 
utilisant les caractères graphiques. 

Si tu as besoin d'aide pour ce premier dessin tu trouveras 
une solution détaillée à la page 28 


“Та peux effacer (corriger) ton dessin avec la barre d'espaces 
Ou avec la touche 
INST/DEL|sans SHIFT 


“Tu peux déplacer ton dessin ligne par ligne en plaçant le 


$i tu veux que la ligne se déplace vers la droite, appuie sur 


INST/DEL avec SHIFT 


si tu veux que la ligne se déplace vers la gauche, appuie sur 


1 


T/DEL sans SHIFT 


“Та peux aussi déplacer le dessin tout d'un bloc vers le haut 
$i tu amènes le curseur sur la dernière ligne et que tu 

tapes RETURN. Note: Si tu veux envoyer le curseur au début de 
la ligne suivante pendant la construction d'un dessin пе 
possédant pas encore de No de ligne ni FRINT ni guillemet, tu 
is appuyer SHIFT avant de taper RETURN pour éviter l'écriture 
de READY ou de SYNTAX ERROR. 


Deuxième étape 


Cette deuxième étape est une caractéristique puissante du 
Có4 avec lequel tu travailles. Il suffit de taper, en tete de 
chague ligne du dessin: 


a) le numéro de l'instruction. Utilise des numéros de même 
longueur pour éviter les décalages dans le dessin. 
b) le ? (abrégé de FRINT). Note: l'instruction PRINT est 


l'instruction la plus simple qui permet de faire des 


tX -ouvicda 
façon fictive car 
fois par ligne. 


d) 


Quand tu auras terminé cette étape, écris LIST et appuie 
sur RETURN, Tu verras défiler le listing de ton programme. 
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бі tu veux que les instructions se déplacent moins vite 


sur l'écran, appuie sur La touche .CTRL. Tu reconnais ton 
dessin méme s'il est listé sur deux lignes. Fasse a l'étape 


trois et tu pourras demander au Có4 d'afficher ton dessin sur 
l'écran. 


Troisième étape 


Топ dessin est maintenant dans la mémoire du  Có4. Four 
savoir ві ton programme fonctionne, écris: RUN et appuie sur 
RETURN. 

RUN est la commande qui fera exécuter ton programme. 


QUESTION 2 La partie du haut de mon dessin disparaft quand le 
curseur réapparaît en bas avec le mot READY. Quoi faire pour 
que mon dessin soit intact? 


Réponses: 11 suffit d'empécher que le curseur apparaisse en 
ajoutant une dernière instruction. бі ta liste se termine avec 
le numéro 1180 (tu as un simple trait pour les fondations), 
alors tu  ajoutes l'instruction suivante: 1190” GUTO” 1190. 
Ainsi le C64 se trouvera emprisonné dans une boucle et il ne 
pourra pas te dire qu'il est prét (READY) à faire autre chose. 


QUESTION 5 Avec cette instruction no 1190 GOTO 1190 que j'ai 
ajoutée, mon programme ne s'arréte jamais. Quoi faire? 


Réponses  Appuie sur STOF 


GUESTION 4 Моп programme n'apparaft pas seul sur l'écran; ce 
que j'avais sur l'écran avant de faire RUN apparaît sur le haut 
de l'écran. 


Réponse: Ти peux effacer l'écran en incluant une nouvelle 
instruction dans ton programme. Si ton dessin commence à 
l'instruction no 1010, écris l'instruction suivante: 


1000 PRINT" Caractère de "COMMANDE D'AFFICHAGE: 
f— — ——————— No 1 page 35. Son róle est de vider 
l'écran avant d'imprimer ton dessin 


QUESTION 5 Comment changer les couleurs du cadre, de l'écran, 
et des caracteres? 


Réponse: Ajoute la ligne 1005 à ton programme. cette question 
sera étudiée au début du chapitre trois. 


ы 
а 


МОТЕ ІМРОКТАМТЕ 


Faire des dessins avec la METHODE des instructions PRINT 
ne permet pas d'incorporer des caractères en CONTRASTE  INVERSE 


(RVSon) pendant que tu fais ton  dessin...c'est-a-dire lorsque 


tu n'as pas encore écrit tes numéros de ligne et ouvert les 
guillemets... 


un programme. бі tu tiens compte de cette remarque, tu peux 


maintenant compléter ton dessin en ajoutant un balcon et ип 
parterre: 


Le balcon et le parterre 


Avant de passer à la 4e étape, tu as une belle occasion 
d'insérer des caractères en contraste inversé... ce qui était 
impossible pendant la construction par la méthode des PRINT. 


Ecris LIST et appuie RETURN. Enlève l'instruction 1190 
GOTO 1190. Tu n'as qu'à écrire 1190 et taper RETURN.  Fuis tu 
transformes la dernière ligne de ton programme (no 1170) de 1а 
façon suivante: 


1- Remonte le curseur sur la ligne 1170 et conduis-le vers 1а 
droite jusqu'à ce qu'il soit sur les guillemets. Retape Les 
guillemets (SHIFT 2) afin que les caracteres de commande 
d'affichage (page 35) puissent s'imprimer sur l'écran. 

A” Appuie sur la barre d'espacement jusqu'à ce que le curseur 
soit sur le caractere situé au coin des fondations. 


3~ Appuie simultanément sur CTRL et RVSon, Det V, espace cinq 
fois, simultanément sur CTRL et RVSoff, Get T cinq fois, & et 
U deux fois, SHIFT M puis RETURN. 


Tu viens de dessiner la lre marche et le balcon еп 
caractères inversés. бі READY est là, tu l'effaces et tu 
écris: 


1180 FRINT" 

о, appuies la barre d'espacement pour amener Le 
curseur sur la colonne qui précede le caractere 
RVSon imprimé dans l'instruction précédente. 


Ensuite tu appuies simultanément sur CTRL et  RVSon, (5 в, 
simultanément sur CTRL et RVSGoff, espace 15 fois, signe moins, 
SHIFT M, puis RETURN. 


Tu viens de dessiner deux marches en caractères inversés et 
une partie du parterre. 
1190 FRINT" 
t appuies...... comme ci-dessus en 1180... 


Ensuite tu tapes 18 fois & et U puis RETURN. 
1200 GOTO 1200 (pour empécher l'apparition de READY) 


Ton dessin est terminé. Ecris RUN et RETURN. Si les 
marches sont en "bon état", tu peux réaliser la 4e étape de ton 
projet. 


Q ième е пі ё а 


Tu dois maintenant sauvegarder ton programme sur cassette 
ош disquette car il faudra le compléter avec des instructions 
FOFE...et un SPRITE dans une prochaine "activité..." 


A) Avec une CASSETTE: 


1- Ecris: SAVE" " 
Kee entre guillemets le nom 
que portera ton programme. 
2- Mets le magnétocassette en marche еп appuyant sur les 2 
touches pour "enregistrement" (record and play) 


5- Quand c'est terminé, tu rebobines le ruban magnétique pour 
avoir le début de ton programme. 


4- Tu vérifies si ton programme est bien implanté sur la 
cassette: 


Ecriss VERIFY" 
ee le nom de ton programme 


5- Mets le magnéto en marche en appuyant sur une seule touche 
pour la lecture (play). 


6- бі tu veux une preuve évidente que ton programme est bien 
sur la cassette: 

a) Ecris: NEW et appuie sur RETURN (cette opération efface 
toutes les mémoires). 

b) Retrace le début de ton programme déjà inscrit sur la bande 
magnétique. 

с) Ecris LOAD et le nom de ton programme entre guillemets puis 
RETURN. La commande LOAD introduit ton programme dans la 
mémoire de ton ordinateur... elle "charge" ton programme. 


Sur l'écran tu lis la phrase suivante: PRESS FLAY ON TAFE. 
Donc appuie sur la touche lecture du magnéto (play). 


7- Enfin, écris: RUN et appuie sur RETURN pour admirer ton 
chef-d'oeuvre sur l'écran! 


Б) Avec une DISQUETTE: 


1- Ecris: SAVE" ji "8 
inscris le nom de ton programme 


е 


2- Eeriss LOAD" d ",8 
inscris le nom de ton programme 


Le chiffre 8 placé aprés la virgule est le No de l'unité 
de disque (ех. la 1541). Le No 1 est réservé pour ton 
magnétocassette...mais tu n'es pas obligé de l'écrire car le 
C64 s'en charge (écriture ‘par défaut‘). 


SOLUTION détaillée de la première étape (de la page 24). 

Voici les différentes touches à appuyer pour obtenir le 
dessin de 1а maison. Voir la p.26 pour le balcon et Le 
parterre. 


Commence par effacer l'écran: SHIFT et CLR/HOME. Ensuite 
descends le curseur sur la rangée3 (n'oublie pas de compter 1а 
rangée 0,1,2,3). Déplace le curseur vers la droite, sur la 
colonne 15 (n'oublie pas de compter la colonne 0,1,2,35,...15). 
Ainsi ton dessin sera construit à droite de l'écran car il sera 
décalé vers la gauche au moment de l'exécution du programme. 


Rangée 3: colonne 15, appuie sur SHIFT et M, espace, SHIFT М. 
Rangée 4: colonne 12, SHIFT étoile, espace, SHIFT 0, espace, 
SHIFT étoile. 
Rangée 5: colonne 13, appuie SHIFT et M, espace, SHIFT М. 
Descends le curseur sur la rangée 8 (rien sur les  rangées 
6 et 75. 
Rangée 8: colonne 21, appuie sur ^ . 
Rangée 9: colonne 21, appuie sur È et signe plus, 
& et T 5 fois, SHIFT М. 
Rangée 10: colonne 14, SHIFT N, G T 12 fois, SHIFT M 2 fois 
Rangée 11: colonne 15, SHIFT М, 14 espaces, 
SHIFT M 2 fois, signe moins. 
2: colonne 12, SHIFT N, 16 espaces, SHIFT M 2 fois. 
5: colonne 11, SHIFT М, 18 espaces, SHIFT M, 
@ (5, signe moins. 
Rangée 14: colonne 11, @ Т, SHIFT 0, @ T 17 fois, 
SHIFT 0, @. 6. 
Rangée 15: colonne 10, SHIFT U, SHIFT étoile, @ G, SHIFT М, 
SHIFT étoile 2 fois, SHIFT I, 4 espaces, G: D, 
@ I 4 fois, È F, 5 espaces, @ G 2 fois. 
Rangée 16: colonne 10, SHIFT Q, espace, ( G, SHIFT signe moins, 
G А, @ S, SHIFT signe moins, 4 espaces, (> L, 
RVSon, 4 espaces, RVSoff, UJ, 3 espaces, & G 2fois 


Rangée 1 
Rangée 13 


Note: RVSon...lorsque tu feras le balcon et le parterre 
Rangée 1 colonne 12, @ G, SHIFT signe moins, @ 2, (> X, 


SHIFT signe moins, 4 espaces, @ L, 
RVSon, 4 espaces, RVSoff, WJ, 5 espaces, GG 2 fois 


Rangée 18: colonne 12, @ G, SHIFT ~, È V. espace, SHIFT ~, 
4 espaces, (е U 6 fois, 3 espaces, & б 2fois. 
Rangée 19: colonne 12, @ G, SHIFT -, 2 espaces, SHIFT -, 
13 espaces, (= G 2 fois, signe - 
Rangée 20: colonne 12, (& 06, SHIFT -, 2 espaces, 
SHIFT ~, 13 espaces, & G 2 fois. 
Rangée 21: colonne 11, @ T 19 fois, (*U 2 fois. 


Des CONSE rati š 


1- Quand tu es en "mode quillemet", les touches CRSR affichent 
les caractères de commande 3,4,5,6  (droite,gauche,bas,haut, 
page 25) et la touche INST affiche le caractère 10 (p.35) 

Etre en "mode guillemet" veut dire que tu écris pendant que 
les quillemets sont ouverts. 

бі tu veux corriger une erreur en te servant des touches 
CRSR et INST, tu dois d'abord sortir du mode guillemet soit en 
fermant les guillemets (que tu effaces ensuite avec la touche 
DEL) soit en revenant dans la ligne aprés avoir tapé RETURN. 
2- бі ton dessin apparatt trop à gauche quand tu fais RUN, tu 
peux le déplacer vers la droite: 


Tu écris LIST et RETURN puis tu arrêtes le déroulement de 
l'écran avec іа touche STOF. 

Tu amènes ensuite le curseur après les guillemets de chacun 
des FRINT (du dessin) et tu appuies sur SHIFT et INST une ом 
deux ou... fois. N'oublie pas de taper RETURN pour que ta 
correction se place en mémoire. 


X- Quand ton dessin est sur l'écran, tu peux voir les lettres 
des caracteres graphiques que tu as utilisés dans ton dessin si 
tu appuies simultanément sur: @ et SHIFT. 


4- Flus tard tu pourras embellir ta maison, la peinturer, 
changer de toiture...Tu pourras ajouter quelques nuages, 
planter un arbre, mettre des fleurs... 


Je te conseille d'attendre avant de "trop investir" car 
les chapitres qui suivent t'enseigneront de nouvelles 
techniques, de nouveaux matériaux pour économiser "temps et 
argent". Pour le moment tu as un toit!... 


Alors commence la construction de ta fusée... 
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Dessine une fusée. Fais d'abord ton dessin sur une feuille 
quadrillée (voir le modèle page 72). 


Entre ton dessin dans un programme par La méthode 


Implante ton programme sur bande magnétique ou sur disquette. 


SOLUTION: pages 67 et 72. 


[PROJET c-1i] 


Dessine 7 oiseaux regroupés en "V" avec la pointe du V orientée 
vers la droite de l'écran. 


Entre ton dessin dans un programme par la méthode des PRINT 
Sauvegarde ton programme sur cassette ou sur disquette. 
SOLUTION: page 53. 


QUESTION 5 Quoi faire pour que l'ensemble des oiseaux soit 2 
lignes plus bas sur l'écran? 


Réponse: Tu ajoutes une instruction 95 dans le programme  C-1 
de la page 25. Exemple: 95 РКІМТ:РКІМТ 

Du bien tu ajoutes 2 caractères de commande No 5 p.35 dans 
les guillemets de la ligne 90. 


PROJET D-1 
Dessine une silhouette du Québec. 
Four ce projet D-1, il faut procéder différemment car une 


(comme pour le balcon et l'escalier de la maison). 


Je te conseille 
із d'utiliser une feuille quadrillée (grandeur nature du 


fond de l'écran d'une TV 14"), et d'y superposer une carte du 
Québec (voir le modèle page 34). 


2- tu cherches ensuite, ligne par ligne, les caractères 
qui ressemblent le plus aux contours à reproduire. Four 
t'aider dans ce choix des caractères, regarde le listing du 
programme D-i page 535 ou la version offerte à la p. 24. 


Remarque sur les contours... Les contours offriront ісі une 
précision assez médiocre car nous sommes en "faible résolution" 
(une résolution de 40 X 25 i.e. 1000). Nous pourrons faire 


t4 
о 


beaucoup mieux dans le prochain volume avec la "haute 
résolution" (40 X 8) X (25 X 8) i.e. 64000. 


- Une instruction (anglais: Statement) est un ordre 
que le programmeur donne à l'ordinateur. 


Le C64 possède 23 instructions pour le langage BASIC 
(avec les périphériques TV et CASSETTE). 


Tu connais déjà deux instructions: GOTO et FRINT 
(en abrégé: 7) 


Une commande (anglais: Command) est un énoncé qui 
permet une conversation directe avec l'ordinateur 


pour lui dire guoi faire avec un programme. 


Tu en as 7 à apprendre CONT, LIST, LOAD, NEW, RUN 
SAVE et VERIFY. Ти les connais diga. sauf "CONT" que 


tu apprendras lors de la prochaine "activité dirigée" 


Une fonction bibliothèque est un petit programme uti- 
litaire que le C64 garde en mémoire et auquel tu 
accedes simplement en signalant le nom de la fonction, 


SOLUTION du PROJET В-і de la page 51. 


Programme B-1 


avec RUN et RETURN 


ا 
ка "sto rett —DUD‏ 
E Д‏ 


E CE. 


--- 


Listing du programme B-1 


avec LIST et RETURN 


998 РЕІМТ ыны ааа ый 

1000 PRINT" 

1010 PRIMT" GE 

1020 PRINT" 

1030 PRINT" 

1040 РЕІНТ" 

1080 PRINT" 

1462 PRIHMT" 

1878 PRIHT" 

1089 PRINT" 

1099 PRIHT" ж 

1100 PRIHT" | 

1118 PRINT" l 

1120 PRIHT" | 

1188 PRINT” і 

1148 PRIHMT" | 

1190 PRINT" ж 
| 
і 


KKK kO IHR 


1168 PRIHT" | 

1174 PRIHT" | 

1180 PRIHT" Ed 
1190 PRINT" l 

1200 PRIHT" Wb WEE 
iaa ӨШТІ 1388 


ГА 
ы 


SOLUTIONS des PROJETS C-1 


et D-1 de la page 31 


Programme C-1 Listing du programae C-1 


95 P 

198 
118 
9 128 
138 
3 140 
150 
168 
172 
à 188 
198 
4 208 
218 
220 
230 
248 
250 


Programme В-і Li 


із) мас 
`a: 


990 
1000 
1818 


RINT In 
PRINT" x 
PRINT! @ 
PRINT" + 
PRIHT" 
PRINT" 
PRIHT" 
PRINT" 
PRIMT" 
PRINT" 
PRINT" 
PRINT" ^ 
PRIHT" € 
PRINT" + e 
PRINT" à 
PRINT" 4 
09070 250 


sting du prograame D-1 


x` 
T 
`. 


ves 


PRINT"! 
PRINT 
PRINT" атты” 


1020 PRINT" 1:4 KM 
1430 PRINT" ма ш DER" 
1040 PRIMT" Ce қы nw m 


1058 


1@7@ 
EL 
18098 


1118 


11568 


1170 
1188 
1158 
1200 
1218 
1234 


PRINT" ІЗ Ea gno wi 


1960 PRINT" ча ш" 


PRINT" їй Ci 
PRINT" а =" 
PRINT" am Ша 


1100 PRINT” 8 ғ 


PRINT!" 19 Ë 


1120 PRIMT" ІН DN 
1138 PRINT” «fl me" 
1140 PRINT" 14 mm 


PRINT" 13 ———" 1 


1168 PRINT" D ы Г" 


РЕІНТ" я ғғ” м. 
PRINT" Я “ВР d An 
PRINT" "я RS m 

PRINT" "Ма ^ n 

PRIHMT" um s 

9070 1238 


Plus tard nous apporterons plus de respect aux contours de 


notre Québec en travaillant en haut 


е résolution. 


ы 
а 


= БОЕО 
ШГ БІНЕ | [ Т : 
STT gë HET i 
Ër HE к BEI d "ole GE m d ol. 
| gnis «A 9+ ogaufdfe jz‘ g‘ a| 219,945) > 95 ДЫ) 9 |. 
PETER etant TUT 
du IHE | 
a tdeo ode toal TITT 


Page 3l 


a mae 
ral “эчә er] ‘dosha фә | | {|| | | 
{әвере [а od AN | | TT T1 17 
3 el gall ZL ТД EMAKUMEEN 
ag A EEEH 
E 
SEN EE НЕРЕСШЕН 
ТІН = “h a thogai $ B" 
E Pfa р [е еза dk Joopa Ж 
gr sağ, "Бәрәзә zy ‘pogau FEH 
u RRE 
ШЕТ IEN 
EH. ЕШ d D d ПЕ +HTU E H 
m D'UDEETT Е 
E ue S ШЕШІ. 
К RESERHZAGZR ER 
ЕЛДЕ: | ШІЛЛТЕЛЕСЕЕЛЕШЕСЕШЕЛІЗ. 
ШАЛЫН БЫН ЕНЕ ebe EE OTT ET, 
е pubzd duNYHWWO Pos drep W 15 пБ 81982%142 11-25 


С” e 50 әзе езе 


ei 


о 


Voici le symbole et le rôle que joue chacun des onze 
CARACTERES de COMMANDE d'AFFICHAGE du C64 


Ces caractères spéciaux apparaissent lorsque tu ouvres Les 
guillemets et que tu tapes les touches suivantes: (en mode 
direct ou programmé): 


Code ASCII Son róle 


CHR$ Lu 


Les touches Représentation du 


caractère 
d'affichage 


SHIFT et CLR 
HOME 


Vider (effacer l'écran) 


Curseur à l'origine (en 
haut à gauche) Sans vi- 
der l'écran. 


EI Curseur à droite. 


Curseur 


HOME sans SHIFT 19 


en bas. 


en haut. 


Curseur 


Inversion du contraste 
(caractère bleu foncé 
sur fond bleu clair) 


b 
8-| CTRL et RVS Retour au contraste nor- 
OFF 146 mal (caractère bleu clair 
sur fond bleu fencé 
ав е И 
9-| INS Supprimer un 


DEL. sans SHIFT 20 caractère 


10-| SHIFT et INST Insérer un caractére 


EL 


Faire un espace. Si tu eg 
өп RVSen, l'espace sera 
bleu clair, 


11-| BARRE D'ESPACEMENT 


35 


CHAPITRE II 


Cette deuxième série d'activités te permettra d'apprendre: 


1- Cinq nouvelles instructions: FOR... TO... STEF, NEXT, 
GET, IF... THEN, РОКЕ. 


2- La commande: CONT (tu connafttras ainsi l'ensemble 
des 7 commandes du Có4. 


5- Cinq nouveaux caractères de "COMMANDE d'AFFICHAGE": voir les 
numéros 2, 3, 4, 5, 6, page ? . 


4- Le tableau des codes-caractères d'écran (page 78) 


5- Le tableau des codes-couleurs d'écran (page 38) 


6— Les variables numériques et alphanumérigues (ou chafnes 
de caractères) 


7- Les six opérateurs relationnels (ou comparatifs) 


8- Les ordinogrammes (ou organigrammes) 


9- Le calcul binaire 


10- Les SFRITES: Comment les introduire dans la mémoire du 
C64 et les déplacer sur 1'écran 


11- Comment utiliser l'horloge du Có4. 


ҚА 
e 


Tu peux afficher des caracteres sur l'écran par des PRINT. 
ou par des EPOKE. 

De méme, tu peux mettre des couleurs sur l'écran r des 
ERINT (niveau élémentaire) ou par des POKE (niveau élaboré). 


Mais FOKE nous offre l'avantage d'écrire directement une 
valeur dans une mémoire vives MEV. 


Il y a deux blocs mémoires d'écran et dans chacune d'elles 


tu peux placer une valeur codée avec РОКЕ. 


11 y a un bloc de 1000 mémoires pour les caractères (1000 
octets). Voir les codes page 75. 


Il y a un bloc de 1000 mémoires pour les couleurs (1000 


quartets). Voir les codes couleur page 38. 


Les 1000 mémoires d'écran des CODES-CARACTERES 
(ou matrice vidéo) 


Adresse Adresse 
1024 —— гг PETERE DEES HH ZE HH 1114--1063 
ЫННЫҢ ГГЦ 
tz fe S MR Ba Я 3 ME DEI 
Be 
Adresse SES ERR B EIE S RET ES 
1524 — HAHA g | 
REGER RRE B M E EENG EES 
HAN ЕЕ ЫЕ Е АВЕ Е 
[ 
i I | Adresse 
1 


BBR 1 ТЕНЕ HHH EF] Eb Ei A E 8а и 


La mémoire des caractères contient le code (0 а 255 
chaque caractère à afficher. Le code binaire est sur 8 
248 = 256 en décimal (248 correspond à 2 puissance 8). 


Ce bloc mémoires commence à l'adresse 1024 et se termine à 


l'adresse 2022. 


EXERCICE 1  Appuie à la fois sur les touches RUN/STOF et 
RESTORE. Ecris en mode direct: 
FOKE 1024,83 et tape RETURN 


Tu viens de placer le caractère coeur (voir code 83, раде 
76) à l'adresse 1024, 1а case du coin en haut à gauche 


(origine). Le caractère est invisible parce que tu n'as pas 
mis de couleur; il est bleu foncé sur fond bleu foncé 


Monte le curseur à l'origine et tu apercevras le caractère 
coeur pendant que le curseur clignote. 

Tu peux rendre visibles les caractères placés eur l'écran 
avec FOKE sans utiliser les mémoires d'écran des CODES-COULEURS 
Il suffit de changer 1а couleur bleu foncé du fond de l'écran. 


EXERCICE 2 Ecris en mode programmé 

10 FOKE 1524,83 

20 FOKE 2025.85 

зо FOKE 53281,1 écris RUN et tape RETURN 
L'instruction Z0o change la couleur du fond de l'écran et 

te permet d'apercevoir les 3 caractères coeurs... Се registre 

(mémoire) 53281 sera étudié plus tard. 


EXERCICE 3 Comment apporter un changement dans ton programme: 


Remonte le curseur sur la ligne 10 et déplace-le vers la 


droite jusqu'à ce qu'il coincide avec le chiffre 3. Tape sur 
le chiffre 1 et appuie RETURN. Fais la méme chose sur le 


chiffre 3 de la lige 20. Ensuite, fais exécuter ton programme 
que tu viens de transformer (RUN et RETURND. 


C'est maintenant une balle qui apparaft au centre ей au 
bas de l'écran (voir code Ві, page 75). 


11 est important de noter que c'est ce code 81 (en 
binaire) qui s'inscrit dans la case mémoire... Les adresses 
1524 et 2023 sont attribuées à des cases un peu comme les 
numéros inscrits au-dessus des portes des maisons. 


Tableau d DES-COULEURS d'écra! 
Avec FOKE COULEUR Avec РОКЕ COULEUR 


Noir Orange 
Blanc Erun 

Rouge Rouge clair 
Turquoise Gris foncé 
Fourpre 2 Gris perle 
Vert 5 Vert clair 
Bleu Eleu clair 
Jaune Gris clair 


о 
1 
2 
4 
5 
6 
Z 


La mémoire d'écran des couleurs contient le code (6 à 15) 
de chaque couleur à afficher. Le code binaire est donc sur 4 
bits. Si tous les bits sont à 4 tu auras le code 15 (gris 
clair). 


Le bloc mémoires d'écran commence à l'adresse 55296 et se 
termine à l'adresse 56295. 


Les i = 
(ou matrice couleur) 
Adresse Adresse 
55296 + «— 5 


Adresse 
55796 


Sg Ep bss Riek ИШЕНИШ 56295 
ИҢ НШЫ ШШ ШЕ 
EXERCICE 4 Mets un coeur rouge au centre de l'écran. 

(En mode direct) 


РОКЕ 1524,83: РОКЕ 55796,2 tape RETURN 


Оп dit: Le caractère coeur est à l'adresse 1524 et son 
code écran est 83 (voir tableau page 75). La couleur rouge est 
à l'adresse 55796 et son code-couleur est 2 (tabl.p.38). 


EXERCICE 3-4 Utilise l'instruction FOKE pour dessiner un so- 
leil orange à l'adresse 1158 et 6 rayons jaunes 
18 PRINT": 
ей POKE 1117.77: POKE 55489,7: POKE 1119,78: POKE 55291,7 
38 РОКЕ 1156,67: POKE 99428,7: POKE 1198,81: POKE 55430,8 
4@ POKE 1158,57: POKE 99432,7: POKE 1197,78: POKE 58459,7 
Sp POKE 1193,77: POKE 355471.7 


EXERCICE 5-В Refais l'exercice 5-A et utilise la 
variable E = 1024 pour la mémoire d'écran située 
à l'origine (0,0). 
Et la variable C = 55296 pour la mémoire d'écran 
située à l'origine (0,0). 


10 Е=1024: C=55296 

20 POKE Е-92,77:РОКЕ C+93,7:PFOKE E+95,78:FOKE C+95,7 

ЗО FOKE Е+122,67:РОКЕ C+132,7:FOKE E+134,81:FOKE C*134,8 
40 FOKE Е-156,67:РОКЕ C+1%6,7:POKE E-173,78:POKE C*172,7 
DO POKE E*175,77:POKE C+175,7 


Le code de 1а couleur jaune est 7. Le tableau age 38, 
te donne les codes des 16 couleurs du С64 que tu peux obtenir 
avec РОКЕ. Le tableau des CODES-CARACTERES d'ECRAN est à 1а 
page 75. 


А l'aide de ces 2 tableaux, invente plusieurs exercices 


pour te familiariser avec l'instruction FOKE. 


iU vas étudier maintenant trois instructions 
fondamentales: FOR... TO, NEXT et IF... THEN 


L'avantage d'une machine c'est de pouvoir lui faire 
exécuter des travaux répétitifs. C'est ce que fait l'ordinateur 
dans une boucle FOR... NEXT. 


EXERCICE 6-4 Fais imprimer 16 fois le caractère coeur sur 
une ligne verticale 


P pu nen 

A REC MA Tü 16 Ecris RUN et appuie RETURN 

zu PRINT" B et tu seras "cordialement" comblé 
34 HEMT H 


Que se passe-t-il au juste? La lettre М est une variable 
numérique qui va prendre successivement les valeurs 1, 2, 3... 
jusqu'à 16. Д 


А chaque itération, c'est-à-dire chaque fois que 
l'ordinateur rencontre l'instruction NEXT М, il ajoute 1 à 1а 
variable N puis il recommence la boucle. Ca paraft plus 
"Savant" quand tu dis: La variable de contróle N est 


incrémentée de 1 à chaque itération. 


il faut noter que 1а variable М forme l'adresse d'un 
emplacement mémoire. Tu peux prendre une autre lettre que М 
comme variable. En fait le (64 te permet d'utiliser les 
identificateurs de variables suivants: 


Soit une lettre: Exemple à, В, C,... 7. 
Soit une lettre et un chiffre (049): Exemple АО, Al, B2, Мі... 
Soit deux lettres: xemple АА, ВБ, CC, NN, AC, BD,... 
(exceptions: ST et TI) 
Essaie... Remplace М par МА ou par М2... 


Quand N vaut 16 l'ordinateur sort de la boucle et exécute 
l'instruction qui vient après NEXT. Б Dy a pas 
d'instruction il considère le programme comme terminé (END) et 
il écrit READY. 


NOTE: Lorsqu'il n'y a pas d'ambiguité, tu peux écrire 
seulement NEXT au lieu de NEXT suivi de 1а variable. Nous 
ferons souvent ainsi dans les prochains exercices. 


Il serait bon que tu connaisses dès maintenant le rôle du 
mot-clef ӨТЕР (le pas). 
EXERCICE 6-B En principe, la ligne 10 de l'exercice 6-4 aurait 
dû étre écrite ainsi: 
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mais quand le pas (ӨТЕР) est 


10 FOR №1 TO 16 ӨТЕР 1 égal à 1, le mot-clef STEF 
n'est pas obligatoire. 


Si tu fais des demi-pas, tu écris ӨТЕР .5 (note: les 
ordinateurs fonctionnent encore avec le point au lieu de la 
virgule pour indiquer Les décimales). 


EXERCICE 6-C Ecris la ligne 10 de l'exercice 6-A comme сесі: 
lO FOR^Nz.5S TO 8 ТЕР .5 et tu obtiendras encore 16 


coeurs car l'ordinateur fera 
le méme nombre d'itérations: 
ssa 1, dy Лу Сау ss Ds 


А la première itération, la valeur N doit étre .5 sinon il 
y aura seulement 18 itérations (15 coeurs). 


Tu peux mettre des espaces dans ta ligne BASIC afin de 
faciliter la lecture du programme, mais chaque espace occupe 
une case mémoire! 


Enfin, quand tu commences par la plus grande valeur de 1а 
variable N, tu dois mettre un signe moins devant le pas. Ех. 


= D 
EXERCICE 7 Utilise un FAS de -.5 pour imprimer 16 coeurs. 


10 FOR N-8 TO .5 STEF -.S5 Tu auras encore 16 coeurs sur 
20 FRINT "9" l'écran. 
ЗО NEXT Е S) 


Avant de passer à l'étude de IF...THEN, ajoute un B] à la 
fin de la ligne 20: 


10 FOR N=1 TO 16 
20 PRINT "@"; 
ЗО NEXT 


Les 16 coeurs s'impriment les uns à la suite des autres. 
Donc le caractère empéche le curseur de retourner à 1а 
ligne. Оп dit: il n"y a pas de "retour chariot" (partie d'une 
machine à écrire gui porte le rouleau), cf | 


LiF... THEN | 


L'instruction IF... THEN permet de tester une condition, 
c'est-à-dire de déterminer SI elle est VRAIE ou FAUSSE. 


Si elle est vrai ALORS aller à une certaine ligne du 
programme ou écrire l'instruction 
(ou les instructions) aprés THEN. 
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EXERCICE В Dans ton programme qui imprime 16 coeurs 
verticalement sur 16 lignes, ajoute une instruction 
IF...THEN pour sortir de la boucle après avoir 
imprimé 8 coeurs. 

10 FOR Х=1 TO 16 


20 PRINT " Bn aprés avoir imprimé 8 coeurs, 
IF X=8 THEN END |1 ‘ordinateur imprimera READY, i.e. 
NEXT qu'il est prét à faire autre chose.. 
Attention: ісі le IF doit étre après la ligne 20. бі tu mets: 
15 IF X = В THEN END tu auras seulement 7 coeurs sur 
l'écran. Fourquoi?... 


Si pour une raison quelconque tu veux mettre le IF à 1a 
ligne 15 et avoir quand тете 8 coeurs, il faudra écrire: 


15 IF X > 8 THEN END (Le symbole Deut dire: supérieur à) 
Les opérateursrelationnels (ou comparatifs) 

=égal 

<inférieur En BASIC 

5supérieur il y en a 6 


>=supérieur ou égal 
«inférieur ou égal 
<>différent 


NOTE: Ces opérateurs peuvent aussi étre utilisés avec des 
variables chaînes. 


EXERCICE 9 Tu veux imprimer un coeur au début de chaque rangée 
de l'écran, donc 25 coeurs. Ecris le 
programme suivant: 


10 FOR X=1 TO 25 
зо FRINT" Q" 


25 МЕХТ 
зо БОТО 20 
Tu constates qu'il n'y а que 2h coeurs! L'impression du 


25e coeur a fait dérouler l'écran et le premier a disparu. 
Quoi faire pour éviter ces "haut-le-coeur"^? 


EXERCICE 10 Une première solution pour empécher un 
retour chariot: mets un [i] après le 25 e FRINT. 


10 FOR Х-і TO 25 


15 IF X= 25 THEN PRINT" fj 'i:GOTO xo 
20 РКІМТ" Ф " 

25 NEXT X 

zo GOTO 30 


Tu vois que SI X= 251a ligne 15 fait imprimer le 25e coeur 
sans "retour chariot" (à cause du )„ De plus, la ligne 15 
fait sortir de la boucle par l'instruction GOTO afin d'empécher 
que la ligne 20 vienne imprimer un autre coeur à droite du 25е 
et provoquer un retour chariot. 


EXERCICE 11 Une deuxième solution pour empécher un 
retour chariot: remonter le curseur d'une ligne 
avant que l'opération "retour chariot" ait lieu. 


ій FÜR Mei TO 25 
15 IF W-25 THEM FRINT Ww" : GOTO 30 


Әй PRINT'" — Ce caractère de 
25 NEKT X COMMANDE d'AFFICHAGE s'ob- 
ЭЙ GOTO 30 tient avec SHIFT et CRSR 


(voir no 6 page 55). 
Il уа une Зе solution avec la fonction PEEK que tu 
étudieras plus loin. 


Voici ce que donnerait 'ordinogra cor а 1 
organigramme) du petit programme ci-dessus! (exercice 10) 

Je te signale qu'un organigramme est une représentation 
graphique qui permet de documenter une partie d'un programme ou 
de l'expliquer. Il est de moins en moins utilisé pour traduire 
un long programme: 


Début du 
traitement 


Initialiser Opération 


impérative 


Opération de 
TEST: X est-il 
égal à 25? 


Imprimer Opération 
"0"; impérative 
NEXT (9 FIN 


Imprimer 


Tu gais déjà qu'une variable numérique représente un 
nombre (p.40). Exemple: 
10 Е=1024: C-55296 


La variable numérique E représente le nombre 1024 et C 
représente 55296. Cette ligne BASIC no 10 se lit comme suit: 
mets la valeur 1024 dans la variable E et la valeur 55296 dans 
la variable C. 

NOTE Le caractere Ë] indique toujours le début d'une 
nouvelle instruction. 


Il у а aussi des variables appelées variables chaînes de 
caractères (anglais: string). Le nom de ces variables 
s'imprime comme celui des variables numériques et se termine 
toujours par le signe E}, 


Identification des variables chaînes de caractères: 


Four identifier une variable chafne, tu peux utiliser soit 
une lettre: Аж, Б, Ct,... ZF. 
soit une lettre et un chiffre: AO, Alf, Е2%, 655%,... 
soit deux lettres: AA, AR, AZ, BDE, HIF... (exceptions TIF) 


Ces variables (avec %) peuvent représenter n'importe quel 
caractère que le C44 peut imprimer sur l'écran: lettres, 
chiffres, graphiques, contrôles CUFSEUF « ew Lorsque ces 


caractères sont placés entre quillemets, ils forment une chaîne 
de caractères (ou simplement: une chaîne). 


Voici 4 exemples de chaînes de caractères: "TEL: 3257—2002" 
"PAUL DUFONT" "ARTHABASKA G6F SW1" "905 BOUL. EOIS-FRANCS" 


EXERCICE 12 Mets la valeur de chacune de ces 4 chafnes dans 
une variable et fais imprimer le contenu de ces 
quatre variables dans l'ordre d'une adresse. 


10 Af-"TEL: 357-2082" 

20 E: JOSEFH DUFONT" 

ЗО C=" ARTHABASKA G6F SWI" 

40 D#="905 BOUL. BOIS-FRANCS" 

SO PRINT БҰ: РКІМТ D#:FRINT CH:PRINT АЖ RUN et RETURN 


Une chafne peut contenir jusqu'à 255 caracteres...mais 
rappelle-toi que tu ne peux mettre plus de 8О caracteres par 
ligne BASIC (y compris les caractères espaces)...Et une ligne 
BASIC occupe 2 lignes sur l'écran du C64. Exemple: 


EXERCICE 15 Voici 1 ligne de ВО caractères (2 lignes sur écran) 
10 Af="0H CHERE MARQUISE TES GRANDS YEUX NOIRS NOUS FONT MOURIR 
D ' AMOUR" FRINTA# 
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Une chafne de caractères pourrait contenir seulement un 


caractere et оп l'appellerait encore chatne. Exemple  E£z"N" 
ou encore A*Xzs" " ой la chafne contient le caractère espace. 
Une chaîne peut aussi ne contenir aucun caractère 


c'est-à-dire que les guillemets se suivent. Exemple С+="". Оп 
l'appelle chafne vide. C'est une chafne vide ou une chaîne de 


GET 


L'instruction GET (obtenir) est placée dans un programme 
pour permettre à l'ordinateur de "recueillir" le caractere que 
l'utilisateur tapera sur le clavier et de mettre се caractère 
dans la variable qui suit GET (GET lit un caractère à la fois). 


11 faut donc que l'ordinateur attende ce caractère, c'est 
pourquoi GET est presque toujours accompagné de l'instruction 
IF... THEN. 


EXERCICE 14 Ecris un petit programme qui provoque 1 ”АТТЕМТЕ 
d'une touche quelconque du clavier. 


10 PRINT"APPUIE UNE TOUCHE" 
20 GET C£$:IF C£z'"!" THEN 20 
A0 FRINT C£ q S ERN. cp Е chaîne СҰ est vide) 
40 END 

Si aucun caractere n'est tapé, la chafne reste vide et 
l'ordinateur "tourne en rond" dans la ligne 20 comme dans une 
boucle infini. Ісі la boucle s'appelle boucle de scrutation 
car l'ordinateur scrute (teste) l'ensemble du clavier pour 
vérifier si une touche a été enfoncée. 


Si tu tapes un caractere quelconque, l'ordinateur met ce 
caractère dans la variable qui suit GET (dans le jargon de 
l'informatique on dit que GET extrait le premier caractère du 
tampon clavier...là où la valeur ASCII du caractère tapé au 
clavier va se loger). 

ASCII: American Standard for Communication Information 
interchange (voir p. 76). 


Fuis l'exécution du programme se continue en imprimant Le 
contenu de la variable Cft, c'est-à-dire le caractère que tu as 
appuye. 


Avec une boucle de délai (d'attente), le temps d'attente 


est fixé par le programme. Exemples FOR Т=1 ТО  1000:NEXT Т 
provoquera une attente d'environ 1 seconde. 


Mais avec GET accompagné de IF c'est toi qui  décides du 
temps de réflexion dent tu as besoin avant de répondre à telle 
Ou telle question. 


X ІСЕ 1 Ecris un petit programme de choix de réponses 
Est-ce que 9 Х 6 est égal à 54? 


FRINT"9 X 6 = 84 VRAI? OU FAUX?" 
FRINT'AFFUIE V QU Е" 

GET А#:1Е Аж-"У" THEN Во 

THEN 60 


PRINT:PRINT АЖ" JE REGRETTE" 
GOTO 90 

FRINT:FRINT ñ#" FELICITATION!" 
END 


Aux lignes 50 et 40 l'ordinateur scrute le clavier pour 
savoir si tu as appuyé le caractère V (vrai) ou le caractère F 
(faux). Si aucun de ces 2 caractères n'a été tapé, la ligne 50 
renvoie à la ligne ЖО pour former une boucle de scrutation. Le 
seul moyen de sortir de la boucle (sans appuyer STOF), c'est de 
taper V ou F et tu obtiens la réponse soit à 1а ligne 80 ou A 
la ligne 60. 


NOTES 1- Tu peux effacer l'écran et aérer l'affichage si tu 
utilisesles caractères de COMMANDE D'AFFICHAGE (page 35) 
2- Avantages de GET par rapport à INFUT: 
a) GET n'abîme pas le dessin sur l'écran car le curseur 
est invisible et il n'y a pas de point d'interrog. 
b) Avec GET, pas besoin d'appuyer RETURN. 


Les 4 caractères de commande d'affichage du CURSEUR 


A la page 19 tu as fait des exercices avec les deux 
touches СКК du curseur. Еп appuyant sur  CRSR avec оц sans 
SHIFT tu déplaçais le curseur dans les 4 directions: 
droite--gauche et en bas--en haut. 


Tu peux obtenir les mêmes résultats avec les 4 caractères 
de commande d'affichage du curseur: пов 5, 4, 5, 6 (voir 
tableau page 33). 


Il faut que tu parviennes à reconnaftre facilement ces 
symboles dans la liste d'un programme et évidemment, le rôle 
que joue chacun d'eux. 


EXERCICE 16 Efface l'écran (SHIFT et CLR/HOME) et 
écris en mode direct 


EL U LUD DT TODD D GR RB EDD DR UL A E A 

JEAN apparaft au milieu de l'écran.  Fuisqu'il y a 11 G en 
contraste inversé entre les guillemets, le mot JEAN s'imprimera 
11 rangées plus bas que l'endroit où il aurait été imprimé si 
ces 11 0 inversés n'avaient pas été placés dans les guillemets. 


De plus, il y a 18 crochets en contraste inversé entre les 
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guillemets, donc le mot JEAN se trouve déplacé de 18 colonnes 
(0-17) vers la droite. 


EXERCICE 17 Efface l'écran et descends le curseur sur 
la rangée 10. Ecris en mode direct: 


PRIMT"MNRETTIIIII]AM" (oiseau: SHIFT U, SHIFT 0, SHIFT I) 


Laisse le curseur là ой il est présentement, c'est-à-dire 
5 rangées plus bas que l'oiseau. Tu écriras l'instruction de 
l'exercice 18 sur cette rangée. 


11 уа 8 balles (SHIFT 0) en contraste inversé dans les 
guillemets, donc l'oiseau a été imprimé 8 rangées plus haut que 
l'endroit où il aurait été imprimé si ces balles inversées 
n'avaient pas été placées dans les guillemets. Tu sais déjà 
que les crochets  inversés ont déplacé l'oiseau de trois 
colonnes vers la droite. 


EXERCICE 18 Ecris, en mode direct, une instruction qui 
effacera l'oiseau. 


РЕІМТ"ИГТТТІ ^ " 3 espaces (avec la barre d'espaces) 


L'oiseau disparatt de l'écran parce que 5 caractères 
éteints (espaces) ont été imprimés à l'endroit où l'oiseau se 
trouvait. 


Comme par hasard, le curseur retombe au début de ton 
instruction!  Descends-le sur l'instruction de l'exercice 18 et 
appuie RETURN. L'oiseau réapparaft à la méme place ainsi que 
le curseur. Donc si tu appuies encore RETURN, l'oiseau 
disparaftra de nouveau... 


Ce déplacement manuel du curseur peut se faire 
automatiquement dans un programme (voir exercices 19 et 20 ). 


EXERCICE 19 Ecris en mode programmé: 


18 PRIMHT "MHI" ; 

24 FOR Іші TO З06:МЕМЯТ I 
30 PRINT" WM"; 

40 FOR Ізі TO ЗВ: НЕХТ T 
Du BOTI 14 


Dans les guillemets des lignes 10 et 30, qp cy A Ts @үү 
rectangle en contraste inversé avec une ligne blanche (éteinte) 
au centre. Le rôle de ce caractère de commande d'affichage est 
de faire reculer le curseur d'une colonne (case précédente) 
(voir no 4 page 35). 


I1 faut regarder chaque instruction PRINT d'un programme 
et pouvoir suivre le curseur "à la trace" et savoir exactement 
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sa position!  Suivons-le ensemble comme un beau gibier qu'on ne 


voudrait pas perdre de vue: 


L'instruction PRINT de la ligne BASIC no 10 dit Ж choses 
au Có4: 


case suivante 

2- recule le curseur sur la case précédente (c'est le rôle joué 
par le caractère no 4 page 35). Evidemment, ce "curseur 
fictif" n'efface pas l'étoile car tu sais que les "contrôles 
curseur" (CRSR) déplace le curseur sans détruire les 
caracteres sur lesquels il se déplace... 

3~ imprime le premier caractère signalé dans la prochaine 
instruction FRINT à l'endroit ой se trouve le curseur 
présentement (c'est le rôle du caractère B] ), 


Allons voir ce que nous dit la prochaine instruction 
FRINT. Elle se trouve à la ligne BASIC no 50 et elle demande 
aussi X choses au Có4: 
1~ imprime le caractère espace à l'endroit où est positionné 
le curseur. 
L'étoile disparaft car le róle du caractére espace est 
d'imprimer "un blanc" (effacer) en mettant tous les bits de 
la case où il se trouve à О (éteints). (Le curseur se 
déplace sur la case suivante). 

2- et X- comme ci-dessus... 


Et le cycle recommence indéfiniment avec l'instruction 
GOTO 10. La ligne 20 forme une boucle d'attente. Le (64 
revient ЖОО fois sur la même instruction, ce qui provoque une 
attente d'environ 1/3 de seconde. C'est suffisant pour que 
l'image impressionne la rétine de l'oeil! De méme à la ligne 
40, l'étoile disparaît (est effacée) pendant 1/3 de seconde. 


EXERCICE 20 Кеғаіѕ l'exercice 19 en remplaçant l'étoile 
par un oiseau 


18 PRIHT" Ж-Е; 

Әй FOR Jal TO 3800: MEXT I 
20 PRIMT" ШЕШІ"; 

48 FOR Ізі TO 388: MEST I 
ай BATA 18 


Le caractere de commande d'affichage "ORIGINE" 


Il nous reste un dernier caractere de commande d'affichage 
à étudier, et cen'est pas le dernier venu car il nous ramène à 
"notre origine"! 


EXERCICE 21 бі le curseur est en haut de l'écran, descends-le 
vers le milieu et écris en mode direct: 


PRINT "sR" 
48 


Le chiffre 5 s'imprime en haut sur le coin gauche de 
l'écran (à l'origine). Le caractère de commande d'affichage à 
L'origine est symbolisé par un [5] еп contraste inversé. 


Four obtenir ce caractère, il faut ouvrir les guillemets 
et appuyer sur HOME (sans SHIFT). боп rôle est de ramener le 


curseur origine. (No 2 page 25) 


EXERCICE 22 Ecris en mode programmé: 


D PRINT" 

18 PRINT MN VIE" 

20 PRIHT ИИК ШИШ)! 

38 PET MT RIIMET IE MELE BOURSE" 


Dans chaque ligne du programme, le premier caractère placé 
après les guillemets est un [5] en contraste inversé. Il ramene 
le curseur à l'origine et facilite ainsi l'affichage sur des 
coordonnées précices. 


Nous verrons plus tard que l'exercice 22 peut s'écrire sur 
une seule ligne BASIC et économiser des mémoires avec l'emploi 
de la fonction SFC. 


EXERCICE 25 À la page 21 tu as fait manuellement un rectangle. 
Cet exercice 23 fera tout ce travail automatique- 
ment... et méme davantage! L'opération sera 
ralentie par des boucles d'attente 


1@ PRINT "CRIME" ; 

ей FORISi TO 1Z:PRIMT"NW";:FOR Те) Tü 18й:МЕяТ T:MEXT I 
Эй БОКА TOLA: PRINT HAM": FOR Те) TO LOG NENT:HEMT 

4й FOR Іші TO 1z:PRIMT"W'"-"NHI"; FOR Те) TO 1580:MEXT:MERT 
ЧӢ FOR Іші TO 11:PRIMT"AMD?::FOR Tei TO 1580:MERT:MEXT 

"S PRIMTUBNBBAE)M EST SI" 

GR PRIHT'MMBEEEERETIGHMOMS" 

Өш РЕТТЕ АТ SE" 

TA PRINT ИВИШ RL ER" 


те OCT 2S 


11 faut que tu parviennes à lire rapidement le message 
fourni par les caractères de commandes d'affichage inclus entre 
les guillemets... Far exemple à la ligne 10 tu diras: efface 
l'écran,... remonte à l'origine,... descends de 5 rangées,... 
déplace-toi de 4 colonnes vers la droite,... et ne retourne pas 
à la ligne suivante (pas de retour chariot). 


Tu as toutes les notions  voulues pour interpréter ce 
programme. Tu pourras refaire l'exercice en changeant le 
message, le format, l'encadrement (ex.:Tape Commodore et +)... 


L'important est de "pratiquer" afin d'acquérir la 
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rapidité, les astuces, l'intuition... du programmeur (chasseur) 
qui suit son curseur "à la trace"! 


Il у a des gens qui vont te dire qu'il faut étre fort өп 
math pour utiliser des SFRITES (pages 8+9) dans tes programmes. 
Au lieu d'écouter ces "prophètes de malheur",  promets-moi de 
lire attentivement les 4 prochaines pages et de faire 
sérieusement tous les exercices...En retour tu auras la joie de 
sortir vainqueur et de pouvoir montrer à tes amis les petites 
merveilles que tu auras toi-même créées. Ces notions sont 
divisées en 5 parties. La quatrième sera ton programme et les 
explications qui l'accompagnent. 


1~ Notation binaire: 


Tu connais bien 1а notation décimale, c'est celle que tu 
emploies pour écrire les nombres. Exemple: 84 cents.  Décimal 
veut dire 10...0n dit aussi notation à base 10. Ainsi le nombre 
décimal 84 est formé de 8 dizaines et 4 unités: 8Xi1O0 + 4X] = 
84. Bravo! 


Le mot binaire te fait penser à deux...Tu as raison car la 
notation binaire utilise seulement deu: symboles: O et 1. Пе 
plus, la notation binaire est une notation à base 2 


Comment obtenir 84 avec une notation à base 27 
a) ZXIXZ2X2xZ242 = 64 . Comme on a multiplié par 2 six fois, tu 
ем 


peux dire: 2 puissance 6 =64 ou 26 = 64 ou 2^6 = 64 
Note: est le symbole de "puissance" ou exponentiation. 


Si tu multiplies par 2 sept fois tu obtiendras 128, 
c'est-à-dire un nombre supérieur à 84. 
b) Ajoute cette valeurs Z2x2xX2x2 = 16 ou 24 = 16 ou 244 = 16. 


Si tu multiplies une cinquième fois par 2 tu auras ©2,..c'est 
trop car 64-32 = 96. 2 
с) Ajoute cette valeur: 2X2 = 4 ou 27 = 4 ou 2 42 = 4 


Ainsi 64+16+4 = 84. Ти as donc trouvé 84 еп passant par 
la notation binaire. Deux fois bravo! 


3- Un OCTET (anglais: BYTE): 


Four bien comprendre la notation binaire, prenons 
l'exemple d'un OCTET(ou BYTE). Un octet contient 8 bits ou 8 
unités d'information. Chaque bit (binary digit) peut prendre 
deux états: soit l'état Ó ou l'état 1. 


Exemple d'un octet: о 1 о 1 o H o o 
Y Ÿ Ÿ 
x ә” 22 
i 4 | 
64 +16 +4 = 84 


Cet octet est le profil binaire de la lettre T car le code 


un 
2 


de ce caractère est 84 (voir tableau p. 76). 


IL FAUT SAVOIR qu'un octet est toujours numéroté de © à 7 
afin d'identifier chacun des bits de l'octet. (Note: Oà7 et non 
188 car l'ordinateur inclut le zéro dans ses comptes!) 


On dit: 
Le bit six est à 1 (ON) 
Le bit trois est à O (OFF) 


Le bit deux est à 1 (ON) 
| provo ER bit zéro est à О (OFF) 


4 6 8 4-5 2 À "9 Les Nos de chacun des В bits(0à7) 
Bout do oq cet d cro чүү L'état des 8 bits (O ou 1) 


O %64%0 +16+0 +4 +0 +0 = 84 Valeur en décimal de l'octet 


Voici un octet qui va t'aider dans les prochains exercices 
car tous ses bits sont à 1 et ainsi il te donne 1а valeur en 
décimal de chacun des 8 bits 


quado gw dw ip Les numéros de chacun des 8 bits 

1 1 1 едені) gesi Tous les bits sont à un (ON) 

27 le 5 b. 5 b 21 2 

A g расу 

128-64452%16%8 +4 +2 +1 = 255 Valeur maximale que peut 
contenir un ectet (byte) 

XERC 24 Si le bit 7 est à 1 (ON), quel sera sa valeur 


en décimal? (Réponse après l'exercice 30) 


EXERCICE 25 Si le bit 5 est à О (OFF), quelle sera sa 
valeur en décimal? 


EXERCICE 26 Quelle est la valeur décimale de l'octet 
Suivant: OOO0100017? 


EXERCICE 27 Ecris la valeur décimale 69 en binaire: 
EXERCICE 28 Ecris en mode direct: 
FRINT CHR# (84) RETURN 
Tu demandes à l'ordinateur d'imprimer le caractère 
(CHARACTER) No 84. Топ Có4 traduit automatiquement 1а valeur 


décimale 84 en binaire: "01010010" et affiche le caractère Т 
(Voir tab.p 76). бі tu écris seulement: PRINT 84 ton Cé4 
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traduira 84 en binaire et affichera le nombre 84. 


EXERCICE 29 L'octet 01001110 est le profil binaire de 
quelle lettre? 


EXERCICE 30 MESSAGE SECRET! Essaie de découvrir ce message 
écrit en langage binaire: 


01001110 о1000001 о1000100 01001001 01000101 
ооіооооо 01000101 01010011 01010100 оо1ооооо 01001010 
01001111 O1001 100 O1001001 01000101 оо1ооооо о1000011 
01001111 01001101 01001101 01000101 00100000 01010101 
01001110 00100000 01110011 00101110 


REFONSES: Question 24: 128. Question 25: О 
Question 26: 17 (16+1=17) Question 27: O1000101 


Question 29: Lettre М car N = 78 (Voir tab. p. 76) 
Question ZO: Nadie est jolie comme un coeur. (-115) 


5- Les OCTETS d'un SPRITE: 


Un sprite contient 63 octets. Four introduire un sprite 
dans la mémoire du Có4 tu devras prendre la valeur binaire de 
chacun des 63 octets de ton dessin et traduire cette valeur en 
décimal. 


Il уа 3 octets par rangée...Tu recueilles leurs valeurs 
et tu places les résultats dans des “БАТА” et en ordre, 
c'est-à-dire comme dans la lecture d'un texte: de gauche à 
droite et de haut en bas. 


EXERCICE 51 Mets dans des instructions “БАТА”, les valeurs 
décimales des 65 octets de "Miss SPRITE". 
Il est bon de mettre un max. de 3 rangées (ou 9 
octets) par instruction DATA pour faciliter les 
corrections (ou transform.) SOLUTION ci-dessous. 
І 


ERE 
ler 2ième ı Зіёте 


GROUPE (GROUPE (GROUPE 
дфпезтнеддцевтесінті 


Rangées 
Exemple: 


Groupe l Groupe 2 Groupe 3 


Rangée 1: 00111111) [11000000 
l'octet l'octet l'octet 
= 0 en = 63 en = 192 en 
décimal décimal décimal 


осін 
іші 


Fremière r Ев: (du DESSIN ci-dessus) 


groupe 1: о 

L'octet du groupe 2: Ж2+16+8+4+2+1 a63 
L'octet du groupe 3: 128+44 =192 
L'octet du groupe 1: 8+4+2 =14 
L'octet du groupe 2: 64+Z2+16+8+4+2+1 127 
L'octet du groupe Ж: 128+64+52+16 -240 
Troisième rangée: 

L'octet du groupe 1: 32+16+8+4+2+1 =63 
L'octet du groupe 2: 128+64+32+16+8+4+2+1 =255 
L'octet du groupe 3: 12B+64+32+16+8 2248 


Tu fais ainsi pour les 21 rangées...Ensuite tu mets les 
valeurs décimales dans des instructions DATA. Fais-le toi-même 
avant de regarder les réponses ci-dessous: 


500 DATA 0,62,192,14,127,240,63,255,248 
510 DATA 127,227,252,249,128,254,240,0,62 
520 БАТА 242,130,158,121,1,50,120,48,20 
550 DATA 120,48,62,60,48,124,61,2,120 

540 БАТА 120,252,120,252,120,120,200,0,95 
550 DATA 200,0,79,20,0,167,72,0,64 

S60 DATA 52,0,16,24,0,96,7,255,128 


бі tu mets 9 valeurs par instruction DATA, tu auras donc 7 
lignes BASIC pour les 6% octets de Miss Sprite. L'instruction 
DATA sera étudiée au chap. 3. 

Sauve ces DATA de "Miss SPRITE" sur cassette ou sur disque 


4- Miss Sprite а l'écran'!: 


EXERCICE $2  Introduis dans ton Có4 les ‘DATA’ de "Miss SPRITE" 
et ajoute les lignes BASIC Nos 10 à 60: 


FOR Май ТО 62: READ D: POKE 8324M.0:MEXMT М 
POKE 53269,4:PÜKE 2842.13 

POKE 53 4:РОКЕ 3277,4 

POKE 52 ü 

РОКЕ 522 
POKE 53254, 130 
& DATA 8.63.192,14.127.248.63,295,248 

а DATA 127.227.252,249,1280.254.2480,0,.62 
a 


ке 
m 


DATA 242,1:38,.128.121,1.:38,128,48,30 
DATA 129, 46,62, 60,46, 124,61,2, 128 
DATA 120, gme. 180,242, 120, 120, 286, à, 35 
ZAG B TS. RA, A ET TZ, Еф 

DATA 32.0,16,.24.0,.95.7.290,128 


Rn BJ) mG SG Dax oe 


iB CR (H CH (CH Cn D CR P (2 B 


LE 


Avant d'écrire RUN et taper RETURN: 
a) Vérifie chacune des instructions et chacune des données 
contenues dans les DATA (Note: on ne met pas de virgule après 
la dernière donnée d'une instruction DATA). As-tu 63 valeurs 
dans les DATA? 


u 
id 


b) Four mieux voir Miss SFRITE, il serait bon d'effacer l'écran 
et de mettre en blanc le fond de l'écran...Pour obtenir се 
résultat ajoute la ligne suivante: 


5 PRINT CHR#(147):FORE 524281,1 


Fais exécuter ton programme... s Une jolie "Noirette" 
apparaft au centre de l'écran. 


EXPERIENCES et explications du programme: 


La ligne No 10 lit (READ) les БАТА et met les 65 valeurs dans 
les mémoires 832 à 895. (Note: les intructions READ et DATA 
seront étudiées au chap. 3) 


Ligne No 20: Expérience...Remplace le chiffre 4 placé apres 1а 
virgule par le nombre 251. RUN et RETURN...Le sprite est 
effacé. 

Conclusion: le registre (mémoire) 53269 "allume ou éteint" 
ton sprite. Remets le chiffre 4 à la place de 251. 

L'instruction POKE 2042,13: L'adresse 2042 est le pointeur 
qui indique à ton C64 qu'il doit aller lire les DATA de ton 
sprite dans le treizième bloc (832 à 895). 


Ligne 30: La première instruction de cette ligne BASIC double 
la dimension horizontale de ton sprite. La deuxième instruction 


double la dimension verticale de ton sprite. (Note: 
Rappelle-toi qu'une ligne BASIC peut contenir plusieurs 
instructions à condition que celles-ci soient séparées par D 


Ligne 40: Expérience...Mets 10 au lieu de zéro après la 
virgule. RUN et RETURN. 

Conclusion: le registre 53289 contient la couleur de ton 
sprite. Notre Miss Sprite devient une jolie "Roussette". (seul 
son coiffeur le sait!) 


Ligne No 50: Expérience...Remplace 160 par 250. RUN et RETURN 
Conclusion: le registre 55252 déplace ton sprite 


horizontal ement « 


Ligne No 60: Expérience...Remplace 150 par 200. RUN et 
RETURN. 
Conclusion: le registre 53253 déplace ton sprite 


verticalement, 


Une dernière expérience: 

Enléve la ligne 30 pour donner à ton sprite ses dimensions 
l'écran retrouve son état normal (fond bleu). 

Fais exécuter ton programme: RUN et RETURN. Ton sprite 
retrouve ses dimensions normales (24x21 points). 


5- Miss Sprite se promène: 


EXERCICE 33 Ajoute les lignes 45 et 70 à ton programme 


gt à la ligne 50, remplace 160 par Х: 


45 FOR X=0 TO 255 
$0 РОКЕ 53252,X 


70 NEXT X:GOTO 45 

RUN et RETURN. Miss SPRITE se déplace horizontalement. 
EXERCICE 34 A la ligne 60, remplace 150 par X. 
60 FOKE 53253,X 


RUN et RETURN. Miss Sprite se déplace verticalement (ligne 
60) et aussi horizontalement (ligne 50). La résultante forme un 
tracé oblique (de haut en bas vers la droite). 


EXERCICE 35 Reprends le dessin du nuage (p. 9) et écris dans 
des DATA les valeurs décimales des 65 octets 
(Note: commence au numéro de ligne 2000): 


Une solution: 


2000 DATA 0,0,224,0,1,248,0,59,252 

2010 DATA 0,127,254,0,255,255,0,255,255 
2020 DATA 1,255,255,7,255,254,15,255,252 
2030 DATA 21,255,248,31,255,254,15,255,255 
2040 DATA 7,255,255,%,255,254,7,255,248 
2050 DATA 21,255,248,62,255,240,127,255,240 
2060 DATA 255,247,224,245,227,192,192,192,0 


Sauve (Save) tes “БАТА” sur cassette ou sur disque. Comme 
ton nuage annonce le mauvais temps, tu peux l'appeler 
"NIMEO-STRATUS", 


NOTE IMPORTANTE avant de faire l'exercice 36: 

Les registres réservés aux SPRITES commencent à 1 ‘adresse 
55248. Frends l'habitude de mettre 53248 dans une variable DS 
(Début Sprite) et d'initialiser cette variable au commencement 
de ton programme. Exemple: D8-253248 

Tu te sers ensuite de la variable DS pour identifier les 
autres registres de ton programme. Far exemple l'adresse 52269 
ou (S3248-21) permet "d'allumer" un sprite (Voir exercice 32, 
ligne 20)...Tu écriras maintenant: 05+21 


EXERCICE 56 A l'aide des exercices 32 à 54 tu peux construire 
un petit programme qui déplacera ton nuage (noir) 
меге le haut sur une trajectoire oblique  commen- 
cant au milieu de la partie gauche de l'écran 


mopmesesiz4g:PRIMT CHRE 1470: PORESA28 NL. 1 
ій FÜR Mea TO 62: READ D: POKE SALEH, D: MENT М 


ра EC Se21.4:PÜKE 2042.13 
дй POKE TELE, PORE USER. 4 
A4 FOE ma 41. 11 


4m FOR Rer TO 178 
4б ЕСЕ Те) TO RE: HEMT 
m FORE 
Өй PAKE 
Bem НЕЙТ ж: 
TATA 
à DATA 
à DATA 1. 
DATE 31. d 
2040 DATA Z gT ДШ, 
zumo DATE 31 255,248 
рабай DATA 255.247.22 


„298. 


‚чш, ДА, 127. 
4,943, ӘР, 192. Coco 


a 


Il у а encore beaucoup de belles choses à apprendre 
concernant les sprites. Nous ferons de nombreuses expériences 
dans le volume deux..., 

Entreprends le projet A-2. Il te permettra de mettre en 
pratique la plupart des notions déjà apprises. 


Photo de Miss SPRITE à l'écran, pages 52 et 53. 


(emer 4-27 


, Au cours de l'activité précédente tu as sauvegardé eur 
cassette les dessins de la maison, de la fusée et des oiseaux 
et aussi la silhouette du Québec. 


a) introduis le dessin de la maison (projet А-1) dans 
la mémoire de ton C64. 


b) Utilise l'exercice 5 E) pour placer un soleil au-dessus 
de la maison 


с) Utilise ton programme de l'exercice 36 pour que le nuage 
vienne masquer le soleil, et pendant que le nuage fait 
disparaftre le soleil, fait passer le fond de l'écran du 
gris clair au gris foncé pour simuler une demi ~ obscurité. 


d) Allume la lampe installée au coin de la maison pour qu'elle 
éclaire l'escalier. S'il y a des moustiques il serait bon 
que la lampe soit jaune! Sinon tu peux mettre une ampoule 

ordinaire (lumière blanche) avec couleur turquoise 
(anglais: cyan) sur l'escalier. 


e) Fais jaillir un éclair entre le nuage chargé d'électricité 
positive et le paratonnerre. 


f) Une demi-seconde aprés l'éclair tu fais entendre le bruit 
du tonnerre. 


g) Fais scintiller la lampe pendant la décharge électrique et 
simule un arrét de courant pendant une demi-seconde. 


Ce serait moins drôle si la coupure de courant se faisait 
au niveau de l'alimentation de ton micro-ordinateur! 


h) Fais sortir le SFRITE de l'écran pour avoir progressivement 
le décor ensoleillé du début 


i) Ajoute, au début du programme, les instructions nécessaires 
pour indiquer quelles touches appuyer pour provoquer: 
i-déplacement du nuage, Z2-l'éclairage, Z-la foudre et 

le tonnerre, 4-l'état initial. 


NOTE: Tu peux mettre plusieurs instructions par lignes BASIC à 
condition de les séparer par deux points EJ . 


Une suggestion: Tu peux organiser ton programme pour que les 


opérations précédentes se déroulent soit automati uement, soit 
manuellement (clavier). 
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LISTING du FROGRAMME 4-2 


950 PRINT'OMAPPUIE SUR":PRIMT'MM POUR GHERIRGE (SPRITE) 

S968 PRIHMT:PRIMT"L POUR JBLERMPES <ECLAIRAGE J (Comment 
S870 PRIMT:PRIMT"E POUR ЖЕШСІНІН + TONNERRE epérer) 
opp PRIMT:PRIMT"D POUR MDBEBUT CSOLEILMMRISOH? 

gus PRIHMT'NENTRPE UNE TOUCHE" 

Dän GET HE: IF Afe" THEN 938 (Attente d'un caractère quelconaue) 
Toon PRINT 


1005 POKE S3200. 15: POKE 53281,1: PRINT CHR£&31? 

1818 FOR Tel TO Š: PRINT: HEMT 

1@4@ PRIHT" id Le róle de chacune des lignes 

1454 PRINT" аен, de ce programme А-2 est expli- 

1@6@ PRINT" SAEI HIERO EUR TN qué dans les pages 61 à 65. 

1@7@ PRINT” # vm 

1080 PRIHT" и чм, 

1a98 PRINT" 2 “с. 

118060 PRINT" КЕ uri D Tes Is 

1110 PRINT" A 

1120 PRIHMT" l 

1130 PRINT" і 

1140 PRINT" | 
| 
| 
ғ 


" 11- (Programme 
E) [| А-1 page 23) 


1150 PRIHT" 
1160 PRIHT" 
1170 PRIHT" 
1180 PRINT" Ca Sch 
1190 РЕІМТ" 

1200 Em-18z4: C=&55296 
1218 PAKE E-93,77:PüKE C+93,7: POKE E-9*5,78:POÜKE C+95,7 (Soleil 
1811 РПКЕ E*-132.67:POüKE C*132.7:PDKE E-134.81:FPUKE С+134,@ exercice 

г Е+1З6,67:РПКЕ Ce136.7: POKE E-173.78:PÜüKE C+1?3,7 5 B p. 39) 
1213 РОКЕ E*«175.77:FÜKE C*175.7 ` 
1229 ПЕТ HE: IF HM£c»"H'"THEHM 122% 


Attente du caractére N 


УЗ өше: ш] ш 

123] Méta 

1240 FOR Мей TO ER: READ D'POKE SAS+H, D'HEXT M 

184% RESTORE (Nuage. s SPRITE 
1290 POKE П6%21,4:РОКЕ 2042,13 exercice 36 p.56) 


1260 POKE 16%23,4:РОКЕ П6%29,4 
1270 РОКЕ Dal, 9 
1280 FOR ма? ТО Z+104 
1285 FOR Tei TO T2: MEWT T 
1290 РОКЕ DS*4,XM 
1295 IF MeSG DR Meid4 THEM POKE S3201.12: T2168 
1296 IF Х=106 THEM POKE S3281.11 
1297 IF М=142 THEM POKE 52281,1 
1200 POKE П6ж5,177-%: IF Х=169 THEN 1000 
1310 HENT М 
ST LE: IF У "ТНЕН 1320 (Attente du caractère 1) 
E C*61ü,7: POKE C«811.7: POKE 04850,7: POKE C+889,7 
іші TO 8 
1345 IF 124 THEN POKE C4657+1,1: GOTO 1368 
1358 РОКЕ С+621+1,1 (Explications p.62) 
1360 NEXT I 


1374 BET ЕЖ: IF E$<>"E" THEM 1378 ttente du c 

LARG FOKE E-177.77: POKE C*177.8: POKE Еж216,77: POKE C+216,8 
1898 FOR Іші TO 4: POKE беб21%1,14: HEMT 

14880 FOR Іші ТО 4: POKE C*GG61*I1.14: HEMT 

1410 POKE C-610,14: POKE C4811,14: POKE C+890,14: POKE C+689,14. 
14280 POKE E+218,77: POKE C+218,8: POKE E-227,99: РОКЕ C+257,8 
1438 FOR Ізі TO 4: POKE C4-G62141.1: HEMT 

1448 FOR Те TO 4: POKE С+661+1,1: MENT 

1454 POKE C+614,7: POKE C+11,7: POKE C+850,7: POKE C*889,7 
1464 POKE E-258,95: POKE C-258,8: POKE E+299,99: POKE 04259,9 
147 POKE E+260,77: POKE C+260, 8: POKE E-261.184: POKE C+Z61,9 
1488 FOR Ізі TO 4: POKE Пя621%1,14: NENT 

1490 FOR Isi TO 4: POKE C-6G6141.14: NENT 

imag POKE C-618.14: POKE C-811.14: POKE C48238.14: POKE C4885,14 
ISIN FÜR vala TO à ЕТЕР -1 

1815 РОКЕ *4296,w:PÜKE S42v7,8:POKE S4278.248 

1528 POKE 54276.129: POKE 54273,9 : POKE S4272. 153 

1638 FOR Tel TO 18:MERT T:POKE Z4273.12:POKE S4872,216 

1548 E Е+177,32:РОКЕ E-216,32:PÜKE Еж218,32:РПКЕ Ежез?,32 
1550 POKE E-258,32:PÜKE E-259.32:PÜKE Е+260,32:РОКЕ Е+261,32 
15560 IF Wein ÜR velg DR ҮшіЗ OR Үші2 OR Vell OR vs18 THEM 1600 
157@ FOR 1=1 TO 4:FÜKE C-5zi-I.1:MEMT I 

1588 FOR Tei TO 4:POKE C-GGl41.1:MEWT I 

1590 POKE C-618,7:POKE C-911.7:POKE COTO 7: POKE CORA, 7 

1506 MEWT М 

iem PIKE Eté, A 

1518 GET D$: IF Deo THEM 1618 5 
Ікей 2-116: BÜTÜ 1230 

әрей DATA й.0й,224.0,1,248,0, Dn, 252 

2016 DATA й. 1874 284,0, ааа, дшш, Wa 20, шышы 

2620 DATA 1.2255, 255 7,208, 294. 15,299, 252 

Фаз DATA 91,255, 248,41, 288, gd, 15, 299, 258 

2040 DATA To RTT. 255. 3,255. 284, Ta дыы. 2488 

2056 DATA 31,285, 248, 69,298, 240, 187, чш, 240 

2060 DATA 2595,247,224.243,227,192.192,192,8 
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(Explications pages 62465 


QUESTION i J'ai introduit dans mon C64 le programe A-2 et 


après RUN je constate que la lumière jaune n'apparaît pas sur 
la lampe... quoi faire? 


Réponse: Fais les exercices 37 et 38 et tu trouveras 
probablement la solution de ton probléme. 


EXERCICE 37 Appuie sur SHIFT et CLR/HOME pour effacer l'écran. 
Ecris en mode direct, c'est-à-dire sans numéro de 
ligne, pour ne pas déranger ton programme déjà en 
mémoire. 


FOKE 1024,12 RETURN. 


Tu viens d'écrire un caractère en haut au coin gauche de 
l'écran (adresse 1024) mais tu ne le vois pas parce qu'il est 
écrit en bleu sur fond bleu 


Remonte le curseur sur le coin gauche de l'écran et tu 
verras clignoter la lettre L.  Redescends le curseur et ajoute 
l'instruction suivante, toujours en mode direct: 


POKE 55296,1 RETURN. Instantanément 1а lettre L s'im- 
primera en blanc sur le coin 
gauche, en haut de l'écran 


Le code écran du caractère L est 12 (voir tableau page 
VS. 
Le code de la couleur blanche est 1 (voir tableau page 38). 


EXERCICE 38  Ecris en mode direct: 


FOKE 1024,81:РОКЕ 53296,7 RETURN. Ta lampe apparaît en jaune 
au coin de l'écran. (code 
Ві, p. 75) (code 7, p. 58) 


Ces expériences te permettent de conclure qu'il y a une 
case-mémoire pour le caractère et une case-mémoire correspon- 
dante pour la couleur. 


Réponse à la question 1:  Frobablement que la case-mémoire de 
ta lampe et la case-mémoire de la couleur jaune ne coincident 
pas! А la ligne 1550 de ton programme, tu ramarques que le 
jaune(7) de la lampe est à l'adresse C+610 (C255296)0...11 faut 
donc que le caractère 1атре (81) soit à Е+610 (E1024)! 


Fremière solution: Voici une méthode rapide pour vérifier бі 
la lampe de ton dessin est bien à E+610: 


Ajoute temporairement la ligne BASIC No 1205: 
1205 FOKE E*610,81:PFO0KkE C+610,7 


RUN et RETURN. Tu peux rapidement constater si la couleur 


во 


jaune coincide avec la lampe de ta maison...Sinon tu peux 
changer les adresses des mémoires-écran de іа lampe et de 
l'escalier...Il y en a plusieurs!...Efface ensuite 1а ligne 


1205. 


le jaune avec la case E+610 
Tu écris: LIST 1000-1190 


Ensuite tu amènes le curseur entre le guillemet et le 
dessin de chaque numéro de ligne 


а) Four déplacer le dessin vers la droite tu appuies SHIFT et 
INST puis RETURN... 

b) Four le déplacer vers la gauche tu appuies DEL puis 
RETURN... 

c) Four descendre le dessin d'une ligne tu ajoutes 1 fois PRINT 
à la ligne 1010, c'est-à-dire 'TO 7' au lieu de ‘TO 6° 

d) Four le remonter d'une ligne tu mets ‘TO S' au lieu de ‘TO 
pu EU QS 


En optant pour la deuxième solution tu n'auras aucune 
correction à faire à l'intérieur de ton programme. 


Rôle de chacune des lignes du programme А-2 (pages 58 + 59) 


Les lignes 950 à 990: 


Présentation sur l'écran des informations nécessaires pour 
que l'utilisateur puisse savoir quelles touches appuyer et 
l'effet que chacune d'elle produira. Ce bloc est complété par 
une boucle d'attente avec GET (voir exercice p.45). 


Tu reconnais plusieurs caractères de COMMANDE  d'AFFICHAGE 
(page 35). Ils permettent d'aérer le texte, d'attirer 
l'attention sur tel ou tel caractère inversé. PRINT permet de 
laisser une ligne vide. On а donc le même effet qu'avec un 
caractère de commande d'affichage по 5 page 35). 

Ligne 1000: Effacer l'écran...Mettre le cadre gris clair...et 
le fond de l'écran blanc. Ces registres 52280 et 53281 seront 
étudiés plus loin. 


Ligne 1010: Boucle d'itération qui permet de passer 6 lignes, 
(FRINT), pour loger le dessin du soleil. 


Les lignes 1040 à 1190 forment le dessin de la maison. 
Les lignes 1225, 1320, 1370 et 1610: 


Ces 4 lignes Basic jouent un röle identique. Frenons 
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comme exemple la ligne 1225. Le C64 attend que tu  appuies 1а 
touche N pour continuer l'éxécution du programme. 


Cette attente est provoquée par l'instruction СЕТ suivie 
de l'instruction IF... THEN (voir GET pagelb...) Si tu  appuies 
une touche qui est différente de ( <> ) М, le C64 revient а la 
ligne 1225 et continue de "scruter" le clavier... Il est retenu 
dans une boucle de scrutation et il en sortira lorsque tu 
taperas la lettre N. 


Aussitôt que la variable chaîne МЖ contient le caractère 
М, le programme continue à la ligne 1227 dont le rôle est 
d'initialiser les variables: а) T2z«durées; b) X=position de 
départs c) Z=variable de service. 


EXERCICE 39 


1225 GET N 

1226 IF N#="N" THEN 1230 

1227 GOTO 1225 

1550 PRINT "ОК" RUN et RETURN 


Le programme continue seulement si tu appuies sur N. Ces 
š lignes (1225,1226,1227) jouent donc le méme rôle que l'unique 
ligne 1225 de ton programme. Quand tu ne peux utiliser 
l'opérateur relationnel "différent de" (^ PT c^ TEE "fast une 
instruction GOTO pour revenir à GET (voir exercice 15 p. 46). 


Dans le programme A-2 il était chaque fois possible et 
avantageux (gain de mémoires) d'utiliser l'opérateur “<> . 
C'est une habitude à prendre: relire ton programme et le 
rendre aussi court que possible. 


Lignes 1250 à 1510: Ces lignes correspondent au SPRITE (Nuage) 
de l'exercice 36 

L'instruction RESTORE (ligne 1245) remet le pointeur ац 
début des DATA...RESTORE sera étudié au chapitre suivant ауес 
READ et DATA 
Ligne 1330: Quand tu appuies L (à 1320) 1а ligne 1330 allume 
la lampe en jaune et projette un éclairage jaune sur les trois 
marches (voir page 39 pour les mémoires d'écran des 
CODES-COULEURS et page 38 pour les CODES О à 15 des couleurs). 


Lignes 1540 à 1360: Eclairage de 1а fenetre 
Les lignes 1380 à 1605: L'originalité de ce projet А-2 se situe 
au niveau de ces lignes où 4 opérations se chevauchent pour 
donner l'illusion de simultanéité: 

1- formation d'un éclair (orange) dans le ciel: 1420,1460 
et 1470 

2- l'éclairage de la maison disparait: 1590, 1400 et 1410 
ainsi que 1480, 1490 et 1500. L'éclairage réapparafts 1430, 
1440 et 1450 ainsi que 1570, 1580 et 1590. 


3- le bruit du tonnerre: 1510,1520,1530 et 1605. Ce n'est 
pas encore du "tonnerre" comme bruit... Tu pourras faire mieux 
au chapitre suivant quand tu auras étudié le son et le bruit 

4- effacer l'éclair: 1540 et 1550 


Ligne 1560: Pendant que le volume (V) du bruit passe de 15 à 
10, le programme n'exécute pas les lignes 1570 а  1590...ainsi 
la maison demeure plongée dans l'obscurité environ 1/2 seconde. 


Ligne 1620: La variable de service Z-116 permet au nuage de se 
déplacer (1230...) à partir de sa position sur le soleil. 
NOTE Tu remarques que le bruit vient après l'éclair et 
continue après la disparition de l'èclair. 

C'est normal! (Vitesse de la lumières: 300 000 000 
mètres/seconde. Vitesse du son environ 340 mètres/seconde. 


Première transformation du programme 4-2 
Sauve d'abord ta version originale sur cassette. 


Tu peux rendre automatigues, i.e. sans toucher au clavier, 
les quatre opérations: nuage, lampe allumée, éclair + tonnerre, 
retour à l'état initial. 


Il suffit de changer les instructions GET et IF par une 
boucle de délai (d'attente). 


EXERCICE 40 Fais cette première transformation 
Remplace 1а ligne 1225 par: 


1225 FOR Tei TO 1000:МЕХТ T 


Cette boucle dure environ une seconde. Tu remarques alors 
que ton micro-ordinateur peut compter jusqu'a mille en 1 
seconde! (en langage évolué), 

Бі tu veux que l'attente dure 2 secondes, remplace 1000 
par 2000. 


Frocède de la méme façon avec les lignes 12520, 1570 et 
1610. 


Tu écris RUN et tu te croises les bras! 


Deuxième transformation du programme A-Z 


Mets une ampoule ordinaire (lumière blanche) et éclairage 
sur l'escalier (couleur turquoise). 


І1 suffit d'amener le curseur sur le chiffre 7 qui se 
trouve apres la virgule dans les instructions FOKE et remplacer 
le 7 par un autre chiffre (voir le tableau des  codes-couleurs 
d'écran page 38). 


EXERCICE 41 Fais cette deuxième transformation à la ligne 1230: 


1330 FOKE С+610,1:РОКЕ C*811,3:POKE C+850,3:PFORE C+889,3 


C'est l'adresse écran Ce sont les 
du code des couleurs du code des 
pour 1а lampe. les marches. 


N'OUBLIE FAS de taper RETURN pour que tes corrections 
passent en mémoire. 


Fais le méme changement aux lignes 1450 et 1590 (là où La 
lampe se rallume quand elle clignote). 


(projet H-1 page 32 dans 


ton micro-ordinateur. 


La fusée est sur l'écran et on attend l'heure "Н" du 
départ. 


a) Introduis l'heure réelle sur l'horloge du Có4 (voir page 66) 


b) Fais imprimer l'heure en contraste inversé en haut de la 
fusée sur le coin gauche de l'écran (heures, minutes, sec.). 


c) Cette horloge devra t ‘indi quer l'heure continuellement 
(pour chaque seconde). 


d) Utilise l'instruction POKE pour allumer les moteurs et 
produire un vrombissement semblable à celui que tu as déjà 
entendu à la TV. 


e) Fais partir la fusée pour qu'elle monte et disparaisse en 
haut de l'écran (calcule environ 2 secondes pour sa 
montée sur l'écran). 


f) N'oublie pas de faire disparaftre aussi le vrombissement... 
car la fusée est déjà trés loin! 


g) Organise ton programme pour que le départ se fasse soit 
manuellement (clavier) ou automatiquement (horloge). 


Une solution de ce projet B-2 est proposée à la page 65. 
Avant de commencer ton projet, fais les exercices 42 à 45 
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PROGRAMME E-2: ПЕРАКТ de ta FUSEE 
Mise à feu manuel (clavier) 


Dap PRIMT'CGNTKDNTSDRNEUKUKUE DUNT TNT NT TTC TE DDC 
10а PRIHMT" ф 
1010 PRIHMT" үт, 


1 PRINT" | 
PRIHT" 

igad PRINT" 

1088 PRIHMT" 

LASA PRINT” 

Lara PRIHT" l 
1080 PRINT" | 
1098 PRIHT" # 
1188 PRINT” 

1118 РВІНТ" 

1120 PRIHT" 

1134 PRINT" 

1148 PRINT" 

[198 PRINT" A 
1168 PRIHT" 

LIFE PRINT? | 
1 PRIHT" | 
à PRIMT" ТАГА! 


Le rôle de chacune des lignes 
est expliqué: pages 67 et 68 
Le caractère damier (pour 
les moteurs) s'obtient avec 
les touches Cemmodore et + 


ғ 


А oC erp 


1388 PRINT" а" TIS SPC(28» "TAPE D'Y; 
1328 GET 

i398 
1340 FÜR Е=1 TO 20 

РОКЕ 84296,19: POKE 54277,0: POKE S4278.240: POKE 54276,129 
POKE "4273.12 : POKE S4272,216 


H PIKE CemaT.2: POKE C+936,7: POKE C4940,2: POKE C-941,7 

A HEMT F 

FÜR Bel TO 12:РЕ1ЇНТ"":НЕХТ 

FOR Не1 Тї Z5 

РЕІНТ 

id ЕСЕ Т=] TO 20: MEST T 

Әй MENT H 

S380 FÜR Velo ТО Я STEP, On: POKE S4295,V: MENT V: POKE S4276. 0 
44] GÜTO seo 


1 
1 
1 
1 
d 
1 
14 
14 
T 
1 
Y 


FROGRAMME В-3: DEFART automatique (horloge) de ta FUSEE 
Il suffit de changer la ligne 1520.  Enléve aussi "ТАРЕ D" 
dans 1300 et tu auras ceci: 
D PRINT A" TIE "ШЕНІ; 
A IF TIRE" AAAS" THEM 1348 


Si tu veux que le départ ait lieu à 16 hres, remplace "205050" 
par "160000". (mets d'abord ton Có4 à l'heure de ta montre). 


Саб: POKE C4937,7: POKE C+938,8: POKE C-340,7: POKE C+941,2 


Les variables TI et ТІР sont en relation avec le temps 
réel d'une minuterie incluse dans le Có4, c'est pourquoi on ne 


peut utiliser ces variables à d'autres fins dans un programme. 


TI et TI£ partent à O seconde quand le C64 est mis à "ОМ" 
et sont mises à l'heure à tous les 1/60 seconde. 


EXERCICE 42 a) Ecris en mode direct 
FRINT TI 

Si ton ordinateur est à "ON" depuis 10 secondes tu liras 
600 (après avoir appuyé sur RETURN) parce que 600 fois 1/60 


seconde = 10 secondes. 


b) Ecris: PRINT ТІ/6О RETURN. 
Cette fois tu obtiens des secondes. 


C) Ecris: PRINT TI/60/60 RETURN 
Tu auras des minutes et TI/60/60/60 te donnera des heures. 


TI est une variable chaîne de caractères qui t'indique 
les heures, les minutes et les secondes sous la forme d'une 
chafne de 6 chiffres. 

EXERCICE 43 Ecris en mode direct 
FRINT "TI? RETURN 


Si ton C64 est à "ON" depuis 1 heure 20 minutes 40 secon- 
des tu auras sur l'écran: 


012040 


м.  — Е 
1 t —— secondes 
minutes 
heures 
TI£ permet d'ajuster l'heure du Có4 à l'heure de ta montre 
EXERCICE 44 Supposons que ta montre indique 20h 15m 30s. Ecris 
TI#="201530" RETURN 
Maintenant le С64 te donnera l'heure exacte chaque fois que 
tu écriras: PRINT TI$ RETURN 
(soit en mode direct, soit dans un programme) 
Cette horloge (ou minuterie) du C64 te sera utile dans un 


grand nombre d'applications pratiques... Elle a les limites de 
ton imagination! 
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el 


Cette fois-ci cette horloge va te servir pour le départ de 
ta fusée et pour t'indiquer l'heure au coin gauche de l'écran 
(projet E-2 page 64). 


EXERCICE 45 Ecris l'heure exacte, en contraste inversé, 
au centre de l'écran. Cette horloge devra 
indiquer l'heure à chaque seconde. 


PRINT "I" 
A PE МЕНЕЕ la ka a HMA" <ТЕУбоп, HOME, 11 CRSR bas 
H PRIHT ME TIE "BREUI"; : GOTO ой 16 CRSR droite: (page 35) 


QUESTION 2 J'ai introduit dans le Có4 le programme B-2 de la 


page 65 et je constate que la fusée s'élève mais les moteurs ne 
S'allument pas! Que se passe-t-il? 


Réponse: Il faut que les mémoires d'écran des 
CODES-COULEURS coincident avec les mémoires d'écran des 
CODES-CARACTERES (voir pages 37 et 39). Le programme de 1а 
page 65 anime une fusée dont la téte est située à la colonne 19 
(n'oublie pas de compter la colonne 0). 


Regarde le modèle tracé sur une feuille  quadrillée (page 
70). 


Compare le dessin de ta fusée avec celui de la page 70 et 
s'il est trop à gauche déplace-le vers la droite de une ou deux 
Ou... colonnes selon 1а méthode indiquée à la 2iéme solution de 
la page 61. 

Si ton dessin est trop à droite, il faut appuyer  INST/DEL 
sans SHIFT. 


Rôle de chacune des lignes du programme В-2 


Ligne 900: Le premier caractère de COMMANDE d'AFFICHAGE vide 
l'écran et les XO autres font descendre le curseur au delà de 
la 25e ligne (no 5 page 25) afin de donner l'impression que la 
fusée sort du bas de l'écran. 


Lignes 1000 à 1200 forment le dessin de la fusée. 


Ligne 1500: Cette ligne commande 7 choses au 'curseur' du Có4: 
i- Imprime en contraste inversé (No 7 p.35), 2- а partir de 
l'origine (No 2 p.35), 3- l'heure (TI$, 4— fais 28 espaces 
[SPC (28)1, 5- imprime ‘TAPE D', 6- remonte d'une ligne (Мо 6 
p.35), 7- et ne fais pas de ‘retour’ chariot ( IBS Notes La 
fonction SPC sera étudiée au chapitre suivant. 


Quand ton C64 a imprimé ‘TAFE D’, le caractère D étant sur 
la dernière colonne, le curseur est passé au début de 1а rangée 
Suivante. Il fallait donc le remonter d'une rangée pour que 
l'heure s'imprime toujours au méme endroit de l'écran. 


x? 


Ligne 1320: L'ordinateur demande le caractère D. Si. tu 
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appuies D le programme continue à 1а ligne 1340. 


Ligne 1330: бі le caractère D n'a pas été tapé le C64 
redemande ce caractère mais en passant par la ligne 1500 pour 
que l'horloge continue de fonctionner sur l'écran. 


Ligne 1540: Début d'une boucle d'itération. 


Ligne 1350: L'adresse 54296 est celle du volume... (comme le 
bouton volume de la TV...: fort ou faible). Le code 15 indique 
que le volume est au maximum...Tu étudierasles registres du son 
et du bruit au chapitre suivant 


Ligne 1260: Simulation de la Mise à feu des moteurs avec le 
jaune (7) et le rouge (2). 


Ligne 1570:  Fermutation des couleurs rouge et jaune pour 
donner l'illusion du feu. 


Ligne 1380: La variable F est incrémentée de 1, ensuite retour 
à 1340 pour une 2e itération... et ainsi de suite jusqu'à ce 
que F = 20. Cette boucle dure environ % secondes pour 
permettre d'observer le phénomène de la mise à feu. 


Linge 1285: Cette boucle amène le curseur sur la dernière 
rangée de l'écran. 


Lignes 1590 à 1420: Le curseur étant sur la dernière rangée, 
chaque itération provoque un ‘retour chariot” (FRINT) jusqu'à 
ce que la fusée soit complètement disparue de l'écran 


La ligne 1410 est une boucle d'attente  (imbriquée) d'environ 
2/100 de seconde. Cette attente se répete а chaque 
itération... ce qui permet à la fusée de parcourir l'écran en 
deux secondes environ... : 


Ligne 1450: Le bruit diminue d'intensité jusqu'à ce que le 


volume V = О 


Ligne 1440: Retour au début du programme. 


өв 


ORDINOGRAMME des lignes 1310 à 1340 
L'heure exacte est toujours indiquée, meme si 


le C64 "attend" le caractere D. 


Impri l'heure...Remontae 
"веце d'une rangée Ligne 13 


| C64 scrute le clavier Ligne 
GET D 


TEST Ligne 1320 TEST: 
e caractere D TE sx 
a-t-il été QUI...alors 1340 


appuyé NÜN...ligne 1330 


Ligne Ligne 1340 


Photo du projet B-2, pages 64 et 65 
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ІНЕН дь мй 
КО ШЕ Sieg 
TRAZ 


E 
2 
E 


Е 
: 


Г 


PEZEN? TECE 
EBEFEEENF N 


ri о MN Ж А "NOD оор б өтерде 
Page 70 


(avec un observateur !) 


PRINT" 


LE GER? 
PRIMT^ m uM. 
PRINT" m WI W 
PRINT” аннан 
ІМТ" SÉ omg M 
PRIMT" М Әри M 
FRIMT" и wu m 
PRIMT" H mcg ш 
PEINT" 4 Wa a 
ЕНТ" m Hi | 
PRINT" we k. 
E WI m 
їй m 
5 E) 
Ce ЖЕ CNN 
SS Se 
We" TIE SPC "ТАРЕ D"): 
ПЕП =" "ТЫ ы AHA 


= РР: POKE ӘРЕ, 240: POKE S4276, 129 
Save emit 
C937 OPI FORE Ceu38.2: POKE САЗА, Р: POKE C-941,2 


| TO 12: PRINT": МЕНТ 
sl TO 25 


1 TO 28: NEXT T 


a FOR els TO 2 STEP-.05: FOKE S42956,V: HEMT V 
A PRIMIT ИШЕТТЕ ЕТИ ИТИННИК TT 

d FRIMT" =. 

ТМТ h... h. h. h. Haa uL o A ЛЕТАА Н 


Р IMT'CTTTTTTTTITTYTIIITYMUE VOIS-TUT" 
(e TT den 
IF T 1 е6 н 


& THEM 14368 

ЕСКЕ 2601.6 

MALS UN POIMT ROUGE" :FPRIMT'MAIS CA ROUGE TROP” 

20 

Ән: FÜR Те) TO Sp: MENT 

Geseit 46: POKE E-451.46: POKE Ep, 42: POKE E+539,39 
! POKE C+dél. e POKE C-5)080.2 

bs FOKE 3268,27: FOR Те) ТП Sa: HEAT 
"GD, шй: FUR Tel gs sg: HET 

ӘР: FÜR Tei TO шй: HERT 

‚Тї: POKE Secus. 

TO 398 Page 71 


del TÜ 


[ Th. 18: MEXT:POKE C-937,2:POÜKE Ce938,7:POKE C-348.2:PÜKE C4941.7 


Four obtenir le programme E-4 de la page précédente, tu 
"charges" ton programme В-2 dans le C64 et tu introduis les 
couleurs dans ton dessin au moyen des caractères de COMMANDE 
(пов 7 et B page 35) et des caractères de COMMANDE 
de COULEURS (voir tableau page 74). Ce tableau sera étudié dés 
le début du prochain chapitre. 


Tu ajoutes ensuite les lignes 1440 а 1580. 


Tu remarqueras l'emploi de l'horloge pour obtenir une 
boucle d'attente de 6 secondes: lignes 1480 et 1490. 


La mémoire 55265 permet de déplacer verticalement le fond 
de l'écran. Exemple: FORE 
52265,27 (position normale) 

FOKE 5265,26 (fait monter l'écran légèrement, 25 davantage... 
FOKE 5265,28 (fait descendre légèrement, 29 davantage...). 


Je n'ajoute pas d'autres explications pour ce programme 
E-4. L'effort que tu fourniras pour le comprendre te permettra 
de résumer les connaissances acquises en langage BASIC. 


La commande CONT dit au Cé4 de continuer l'exécution d'un 
programme que tu as arrété avec la touche STOF. CONT fera 
aussi continuer l'exécution d'un programme qui a été arrété par 
une instruction STOP ou END inscrite dans le programme (voir 
exercice 16 du chapitre IV). 


Expérience Lorsque ta fusée monte sur l'écran appuie la touche 
STOF et écris 


CONT puis tape RETURN 


NOTE 1- Cette commande ne fonctionne pas lorsque tu arrétes le 
déroulement du listing d'un programme. 
2- On utilise généralement la commande CONT en liaison 
avec une instruction STOF introduite temporairement 
dans un programme pour la recherche des erreurs... 


CHAPITRE ІІІ 


Série No X 


Cette troisième série d'activités a pour but de te 


familiariser avec 


1- 
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Les 16 caractères de COMMANDE des COULEURS 


La notion de compteur 


Les 16 couleurs du fond et du cadre de l'écran 


Une technique: la balançoire 


Les opérateurs logiques 


Etude de six fonctions: FRE, SFC, TAB, ASC, CHRE, РЕЕК 


Le tableau des caractéres ASCII 


Quatre nouvelles instructions: READ, DATA, RESTORE, et REM 


La programmation du son et de la musique. 


Les 16 caractères de COMMANDE des COULEURS 


Ces caractères apparaissent lorsque tu ouvres les guillemets 
et que tu tapes les touches suivantes: (en mode direct ou prog.) 


Appuyer simulta Caractère del Le rôle de Codes ASCII 
nément sur les commande de chacun des (voir p.95) 
touches: couleur: caractères: СНК%( 7) 


| 
[€ | —_ 
CNE 
кезе | 


gris Ғөпсе 


5 


LI 


bleu clair 
ЕЗІ 


Tableau des CODES-CARACTERES d'ECRAN 


Pan i a PP BHIIBREDE 


Avec POKE POKE POKE POKE POKE POKE 
0| @ 27 аве | ej H 911 EH 106 
1 | A al 214€ | 49] 1 SAIL ^ || ez| | 107 
218 b| 2|; [so 2 |j в || ell! 108 
з| с ei ol, |е |з |е с || ә тг | 1091 
«|o af aje |е |а |е ol em қ) то 
5 | E е) з ЕМСЕ s3 | 5 | Ө|ГІ Е || oe|ESPACE || 111 
6 |F гз! ее ||] ғ || ә | ‚112 
7 G sg [234 | “ss |7 71 ІШ G 98 = 113 
він h 5) ЗЕ ||] ie 114 
э [1 | зз (ьо (оз К] '][| 100] L] 115 
10, |o J dej || 37 | % || в "HN Aaf! “ne 
11 K k ja [5| : j БІРІ кіші ER 117 
12 L ШЕКТЕ L 2 во ШЕ Ë L || 103 | 118 
з [M т) 40 | e |е | =. 177 N] ml зоа ka 119 

w N nl al) e | >| 79 [7 N| ios ZI 1% 
15 O: cossa? | "es + bred o 121 
16 P рі 43| + 01] Р 122 
тоа O 11/9) o 123 
18 | R | 45] — 82|] Rn 124 
19 S s| 46 83| || s 
20m Ter ат | mp] т 
21, U eu ө|Г2 u 
227 (ЕУ ЖЕТУ в | [х] у | 
2 |w w з? ТӨЛЕ! 
Ee 8 | & хі 
25 ay 89 tT Y 
IZ! z 90 

? EL Mode texte ы s 

Mode graphique (normal) 
NOTE: 


Four obtenir le caractére en contraste inversé il 
suffit d'ajouter 128 au code ci-dessus, 
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[ 


m |H! 


LE! 


= 
N 
о 


[^] 


A2 


ET! 


со 


26 


27 


PRINT CHH$( 


m 


dr 


[z] 
-2 
cu 
= 


4 


TABLEAU des CODES ASCII 
) CHR$( 


m 


E 
wm 
! 


- 


) 


9 


ve 


> 


D 


84 


85 


du 066% (en décimal) 


PRINT АЅС(" д") 


£ 8 


94 — 


z EHS A IEEE 
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110 


pni 


142 

113 

|14 
115 
111 

117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 


129 
130 


131 

132 
133 
134 
135 
136 


137 


АЗСЕНтФСІРОУХЫГИЯІ Т YS KS 


,----------------------------- 


- 
ы 


ВЕТИЯМ 


SWITCH ТО 
UPPER CASE 


U 


М 


SIS fal: s юн 


166 
167 
168 


169 


170 
171 
172 
173 
174 
175 
176 
177 
178 
179 


180 


181 


182 


183 


184 


185 


186 


187 


188 


189 


190 


191 


m МЕ Ж 


ee GG 00 ШЕ SDS SSSR 


Tu es sans doute familier présentement avec les 11 


Il faut maintenant que tu deviennes aussi habile avec les 
16 caractères de COMMANDE de COULEUR. Le tableau de La page 74 
t'indique le symbole et le rôle que joue chacun de ces 
caracteres. 


EXERCICE 1-A Utilise la couleur pourpre et écris BONNE FETE 
en mode direct: 


РЕІМТ"ЯВОММЕ FETE 


Sur la partie verticale de la touche El ile рухта 
Caractères graphiques; celui de gauche[flest utilisé, en 
contraste inversé, pour symboliser la couleur rouge. C'est ce 
caractère que tu vois entre les guillemets au début de la 
chafne (No S p. 74). 


EXERCICE 1-B Refais l'exerc. 1-B en contraste inversé et commande 


2 — eure bleu fone: coup BLANC POUR VOIR LES COULEURS 

РОКЕ S3201. L'PRINT'MMBONNE FETES" 

La touche «| est située en haut du clavier, à gauche. 

C'est ce caractère, en contraste inversé qui sert de symbole 

pour 1а couleur bleu et que tu vois après le mot FETE (Мо 7 p. 
Vi foncé 


EXERCICE 2 Ecris ce petit programme: 


t] Eang T T EE UT. 
28 FÜR Tel TO 1000: MEST 
SU PRIHMT'M DAME RE Т ТЕТТЕ 
48 FOR "Tei TO 1808: МЕТ 
e GOTA 18 

Dans ce programme tu as utilisé 2 nouveaux caractères de 
commande de couleur pour obtenir le jaune et le noir (voir les 
nos B et 1 du tableau page 74). 


Sur la partie verticale de la touche tu vois le 
caractère "pi" [7]. C'est ce caractère Zen contraste inversé 
qui sert de symbole pour la couleur jaune. 


Le symbole de la couleur noire est le caractère espace еп 
contraste inversé avec une rangée éteinte en haut et une 
colonne éteinte à droite (bits а 0). Sur l'écran il а donc la 
forme d'un rectangle un peu plus petit que le curseur? 


Le caractère de commande de la couleur jaune est au début 


de la chafne de caractères de la ligne 10 et celui de la 
couleur noire est au début de la chaîne de caractères de la 
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ligne 30. 


N'oublie pas que les deux chafnes doivent contenir le тете 
nombre de caractères pour qu'il y ait superposition des 2 
messages sans laisser de trace du premier! Tu comprends alors 


le róle des caractéres espaces dans la chafne de la ligne 20. 


EXERCICE 5 Ecris un court programme qui fait clignoter les 
mots GRANDE VENTE en contraste inversé et de la 
couleur rouge. Organise le programme pour que le 
message apparaisse pendant 1 seconde et disparaisse 
pendant 1/2 seconde. 


ій PRINT: POKE S3281.1 
ӘЙ FÜR Tel TO ШӘЙ: 
20 РЕТТЕ WERTE NM" 
Фй FÜR Те) TO Loggt MET 
D BATA 18 

Dans ce programme c'est tout l'écran qui s'efface et 
demeure dans cet état pendant 1/2 seconde. Le symbole се 1a 
couleur rouge est le premier caractère à l'intérieur des 
guillemets de la ligne no ЖО, 


En amérique notre unité monétaire est le dollar: 
En Angleterre l'unité monétaire principale est la Livre 
stirling: £ . Sur le clavier du Cé4 la touche est située à 
gauche de la touche CLR/HOME. C'est le caractère: £ en 
contraste inversé qui sert de symbole pour la couleur rouge. 


REMARQUE: Quand tu tapes sur le clavier du C64 et que tu veux 
que l'écran affiche les caractères dans une couleur plus 
lisible ou plus "reposante"...,tu appuies à la fois sur CTRL et 
le chiffre ayant la couleur qui te plaft' 


EXERCICE 4  Dessine une petite auto dont les contours seront 
verts et allume les phares pour qu'ils éclairent 
(en blanc) sur une distance de 2 colonnes, Mets 
les roues de couleur turquoise. 

D PRINT": POKE 53281,0 

18 PRINTY BLU Мар" 

Әй PRIHMT" | EcL 

S PRINT" Leg n 

48 PRIMT"M o ч" 

EH 

Le С64 se charge de fermer les guillemets de facon fictive 
car ils n'ont été ouverts qu'une fois par ligne BASIC. 


La touche en contraste inversé forme le symbole de 1а 
couleur verte. Le symbole du blanc est le caractère en 
contraste inversé. Le symbole de 1а Couleur turquoise 


(anglais: Cyan) est le triangle [à qui forme le caractère 
graphique inversé sur la gauche de la touche étoile (voir les 
nos 2, 4, 6 du tableau page 74). 
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пе сопс і importante: Ти viens d'apprendre que si les 
guillemets sont ouverts et que tu appuies CTRL et l'un des 8 
chiffres, un symbole spécial apparaft et ce symbole correspond 
à l'une des couleurs inscrites sur 1а partie verticale des 
touches des chiffres: ВК (поі)... УЕ (jaune). 


Ce n'est pas tout! Le Có4 a 8 autres couleurs..,Si les 
guillemets sont ouverts et que tu appuies la touche COMMODORE 


et l'un des 8 chiffres, il apparaftra aussi un symbole spécial: 


1 ORANGE Symbole: Shift А inversé (Voir p.74 No 9) 
2 BRUN Symbole: Shift U inversé (Voir p.74 No 10) 
Ж ROUGE CLAIR Symbole: Shift V inversé (Voir p.74 No 11) 
4 GRIS ҒОМСЕ Symbole: Shift W inversé (Voir p.74 No 12) 
5 GRIS PERLE Symbole: Shift X inversé (Voir p.74 No 13) 
6 VERT CLAIR Symbole: Shift H inversé (Voir p.74 No 14) 
7 BLEU CLAIR Symbole: Shift Z inversé (Voir p.74 No 15) 
8 GRIS CLAIR Symbole: Shift + inversé (Voir p.74 No 16) 


EXERCICE 5-A Introduis dans un DATA les 8 couleurs obtenues 
avec CTRL...Ensuite dans un 2iéme DATA les В cou 
leurs obtenues avec COMMODORE...(N'oublie pas de 
placer ces symboles entre guillemets): 


10й DATA "gn, "gn, "Dn, UI, "ën, "Bir, up, umu 
11@ DATA "ovg, r Um, rug ШЕП» ШИТ 


soit de COULEUR (p. 74) 
NOTE: Ces caractères de сонне 


soit d'AFFICHAGE (p. 35) 
n'apparaissent pas lors de l'exécution du programme, c'est-à- 
dire quand tu écris RUN et tapes RETURN...Mais le caractère qui 
suit un caractère de COMMANDE  s'imprime dans la case 
précédente, là où se trouve le caractère de COMMANDE dans les 
guillemets. 


EXERCICE 5-В Les caractères deviennent illisibles avec 
certaines couleurs formant le fond de l'écran! Ce 
programme écrit le mot MARIE en 16 couleurs diffé 
rentes sur 4 sections d'écran. Le fond de l'écran 
peut changer 16 fois (une nouvelle couleur chaque 
fois) en tapant une seule touche: 


ù FOR CFeÿ TO 15 
14 PRIMT'T": РОКЕ 5S3281,.CF 
18 PRIHT"R TOI ПЕ CHOISIR" 
ie PRIHT'"COLULEUR DU FOND: MO " CF "4PRGE 238 MMM" 
Әй FÜR Те] TI 16 
5 КЕНІ Ct: PRINT C#iJ'MARIE", 
IF Jed ПЕ Js OR J-12 THEM PRIMT 
HEAT J: RESTORE 
dp PRINT "ЖЕМЕТЕРЕ Ж" 
+5 GET RE: IF Асу" THEN 45 
S МЕЯТ CF: PRINT: POKE Sazali. g 
d LATE WM P n CM à nm à "AU 1 WW à n nig à "m , "m" 
1 1 | тата Me, H a W A " ni" ^ "gm 3 "ygu n nui" F n Ме ы à "ggn 


Tu remarques que les numéros 
des couleurs commencent à 0 
avec POKE (noir) 

et à I avec PRINT (noir). 
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Les instructions КЕМ пе sont pas exécutées quand tu écris 
RUN et appuies RETURN, 


REM (KEMarque) permet d'ajouter des commentaires dans le 
listing d'un programme pour еп faciliter la compréhension. 
Exemple: le but du programmes le rôle d'une variable, d'une 
formule, d'un sous-programme, etc... 

REM peut étre placé au début d'une ligne BASIC ou lus 
loin dans la ligne à condition qu'il soit précédé de íi š 
Exemple: 

5 КЕМ Ce programme calcule la racine carrée des nombres 1 à 100 
10 КЕМ Les résultats seront arrondis à deux décimales. 

15 М-100%3ж2:КЕМ Le caractère ж est le symbole de la multiplic. 
20 


Le C64 commencera l'exécution du programme à la ligne 


Notion de COMPTEUR 


Dans un programme, un compteur est une variable de 
contrôle qui compte le nombre de fois qu'une ou des 
instructions seront exécutées. 


EXERCICE 6 Ecris un programme qui affiche sur l'écran 
le carré des 20 premiers nombres. 


10 FRINT"NOMERES" , "AU CARRE" 
20 Ізі 

SOCXPEINT- I, 

40 C-I*I 

SO FRINT C 

60 IzI*l 

70 IF I220 THEN END 

80 GOTO A0 


Ligne 20: Initialisation du compteur (obligatoire ісі parce 
que I commence avec une valeur différente de 0). 


Ligne 60: Incrémentation de 1 du compteur. Note: Pour 
obtenir le carré des nombres  impairs seulement, il faudrait 
incrémenter le compteur de 2: (IzsI42). Fais l'expérience... 


Ligne 70: Test d'arrét. 


Tu peux obtenir le méme résultat avec une boucle FOR... 
NEXT au lieu du compteur. 


EXERCICE 7 Remplace la ligne 20 de l'exercice 6 par: 


20 FOR Ізі TO 20 
Efface les lignes 60 et 70 et remplace la ligne 80 pars 
ВО NEXT I 


Tu auras: 
10 FRINT"NOMBRES","AU CARRE" 
ЕО FOR Ізі TO 20 


50 FRINT I, 


40 CzI*I 

SO FRINT C 

80 NEXT I 

Ligne 20: FOR 1-1 TO 20 signifie: exécute toutes les 


instructions qui suivent jusqu'à l'instruction NEXT, et fais 
cela ZO fois! 


Avec ҒОК...МЕХТ, le compteur est créé,incrémenté et testé 
implicitement. 


Si tu veux seulement le carré dee nombres impairs, 3d 
faudra ajouter STEF 2 (le pas) à l'instruction no 20: 


20 FOR Ізі TO 19 STEP 2 
Fais l'expérience... mets ta boucle "au pas"! 


QUESTION Les instructions РОК МЕХТ remplacent 
avantageusement le compteur. Cette notion de compteur est donc 
inutile! 


Réponse: Сей exemple а été choisi justement pour que tu 
constates qu'une boucle d'itération avec FOR...NEXT est 
préférable à un compteur... (économie de mémoires). L'important 
est de comprendre comment fonctionne un compteur dans un 
programme Car tu auras à t'en servir souvent, soit à 
l'intérieur d'une boucle FOR...NEXT ou à l'extérieur... 
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Dans son état normal, le Có4 donne un fond d'écran de 
couleur bleu foncé (No 6 p.74) et un cadre bleu clair (No 18 
p.74). 


Le REGISTRE 55280 contient l'une des 16 couleurs du cadre 
de l'écran 


Le REGISTRE 53281 contient l'une des 16 couleurs du fond 
de l'écran 


VOIR le tableau des codes-couleurs d'écran page 58. Le 
numéro de ces couleurs est introduit dans les mémoires 55280 et 
53281 par l'instruction FOKE. 


EXERCICE 8-A Mets un cadre orange et un fond noir: 
FOKE 55280,8:РОКЕ 55281,0 RETURN 


EXERCICE 8-B Demande au С64 d'imprimer les caractères en blanc: 


FRIHMT"" ou CFRINT CHRE (5) (Voir No 5 р.76)2. 
HO 2 PAGE 74 
Cette combinaison te permet d'écrire en blanc sur fond 
noir avec cadre orange. Essaie d'autres combinaisons... 


l'instruction précédente était en mode direct. Tu peux 
aussi mettre cette instruction dans un programme. Lis le 
programme C-? (page 85) ей note les instructions dans 
lesquelles le cadre ou le fond de l'écran sont transformés 

En as-tu trouvé au moins 4? 


EXERCICE 94 Frogramme qui fait passer le Fond de l'Ecran par ses 
16 couleurs...avec une seconde d'attente... 


10 FOR FE=Q 


20 POKE,S: 

зо FOR Т=1 TO 1000:МЕХТ Т 

40 NEXT FE 

EXERCICE 9-B Frogramme qui fait passer le CâAdre par ses 16 


А 
avec une seconde d'attente entre chaque couleur: 


10 FOR CA=0 TO 15 

20 FOKE $3280,CA 

FOR Т=1 TO 1000:NEXT Т 
40 NEXT CA 


EXERCICE 9-С Construis toi-même un programme qui donne les 
16 couleurs des caractères (Voir exercice 5-E). 


L'instruction LET est une instruction d'affectation. Elle 
est toujours disponible sur le Có4 mais tu n'as pas à 
l'utiliser dans tes programmes car cette instruction est si 
fréquente que les constructeurs ont organisé le "système" du 
C64 pour que LET joue son rôle automatiquement. En principe, 
il faudrait écrire ainsi ce petit programme: 


10 LET АЗ L'écran affichera: 
20 LET Ет-"М016" 2 mois 
ЖО FRINT A, BE 


LET indique que tu veux mettre la valeur 3 dans 1а 
variable numérique А (affecter 3 à А) et mettre la chaîne 
"MOIS" dans la variable alphanumérique (ou variable chaîne) BE. 


EXERCICE 10 Ecris le petit programme ci-dessus sans employer 
l'instruction LET 


10 A=3 
20 B$z"MOIS" 
50 PRINT o, Dë RUN et RETURN 


Il est important de noter que, dans le langage BASIC, le 
signe - est un signe d'affectation. 11: íw a pas la 
signification d'une équation algébrique. 


Un autre exemple: Kegarde l'exercice 6, ligne 60, page 
80: Tu as I=I+i. Il faut lire cette instruction de 1а façon 
Suivante: Ajoute 1 à la variable I et met (affecte) le résultat 
dans la variable de gauche qui se trouve à être aussi la 
variable I. Si la variable I valait 4 avant l'affectation, eh 
bien quand l'instruction sera exécutée, l'ancien contenu sera 
perdu et I prendra la valeur 5 (note: сесі nous permet 
d'utiliser des formules de récurrence pour calculer, par 
exemple, la somme des N premiers nombres). 


Le langage BASIC est une adaptation du langage FORTRAN 
pour rendre plus faciles les manipulations de caractères. Dans 
nos 2 exemples ci-dessus, А=5 et І=1+1 le FORTRAN écrit À < š 
et I< I+1. Dans се cas, la flèche traduit mieux la réalité 
de l'affectation que le signe = , 

Note: Basic est un langage développé par le Darmouth College en 
1960 et les 5 lettres de mot Basic viennent de: Beginner's ali 
purpose symbolic instruction code. 


te 
i4 


Tu as déjà sur ta cassette la PROJET C-i de la page 50. 


а) Tu peux introduire le dessin des oiseaux dans la mémoire du 
C64 et insérer (INST) une variable chafne devant chacun des 
guillemets des lignes 100 à 240. 


b) Mets le fond de l'écran et le cadre de couleur bleu clair et 
les oiseaux de couleur noire. 


C) Fais avancer l'ensemble des oiseaux vers la droite de 
l'écran au rythme d'un battement d'ailes par colonne. 


Four cette animation utilise l'instruction PRINT avec les 
caractères de COMMANDE d'AFFICHAGE du curseur et du CLR (nos 1, 
5, 5, 6 page $5). 


Utilise le caractére "curseur à droite" comme compteur de 
colonnes. Dans ce cas la variable du compteur doit étre une 
variable chatne de caractères, 


d) Fais scintiller un soleil en haut de l'écran sur le coin 
droit en te servant de l'instruction POKE. 


e) Des scientifiques pensent que les oiseaux migrateurs 
s'orientent le jour d'après le soleil... et la nuit d'après les 
étoiles... 


Quand les oiseaux atteignent le milieu de l'écran: 
--mets les oiseaux de couleurs bleu foncé 

--mets en noir le cadre et le fond de l'écran 
т-Жаів scintiller une étoile à la place du soleil. 


f) Quand l'oiseau qui forme la pointe du V a atteint 1а colonne 
58, tu arrétes le mouvement pendant une seconde (n'oublie pas 
qu'il y a 40 colonnes mais que la première commence à О et 1а 
derniere est à 29), 


g) Ajoute un compteur (avec variable numérique) pour que le 
тете parcours horizontal de l'écran se répète 2 fois. 


Une solution de ce projet est donnée à 1а page suivante. 
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5 Тай an PROGRAMME C-2 
ій I$ "US Еа (ma 296 
; E 53280.14: PUKE 82281,14 


QPTGPOKE Ee3?.G6R:PÜKE Ep, 74 
SPIPÜKE ES-TS.GICPORE E79. ed 
POKE E*117,93:POKE E-118,.77 


CT THEN POKE Mage, A: FORE See, 9 
8 POKE CH Ho FORE Шан, 

POKE C-77,.2' POKE 0479,8 
POKE С+117›8: РОКЕ C+118,8 


1: PüKE C487,1: POKE Сеа, 1 

Se dE CeTz.1: POKE C477,1: ROKE Gren, 1 

Әй РОКЕ C-116,1: PORE 04117,1: РОКЕ 04118,1 

р E C*-157,1 

Sa IF Тс "ЕЕЕ" THEM FRIMT"W": GOTO 188 
Эш PRINT” E” 

JAM РЕІМТІЯ" 4 

119 PRINTIS" d 

120 PRIHMTIE" 2 ^ 


Le róle de chacune des lignes de ce 
programe C-2 est expliqué à la p.86 


130 FRIMTI£" в 

1480 РЕЇЧҮЇ#" S ^ 
ERINTI" w 
PRIHTISE"' < ^ 


PRIHTIS£" W 
PRIMTIE" “ z 
38 PRINTIS” % 

aa ЕЕІМТІЯЖ" 
18 PRIHTISE" в“ 
A РКІНТІЖ" ~ 
SA PRINTIS” 4 
PRIMTIE" ~ 
A FÜR "Tei TO 28: MEWT 
РЕТМТИТТТГІТІТТІТІТІТТІГІТІГІ 

IF [&=' a IIR" "HEH den 
FRIMTIE" + 

d PRIMTIS" m 

PRIMTIS" * E 

A РЕІМТІЖ" ж 

d РЕІМТІЯЖ" х е 

РЕТМТІЖ" # 

ЕМІНТІЖ" ы ғ 

PRIMTIE"' L] 

PERINTIS” е 
РЕІМТІЖ" L] 
ЕКІМТІЖ" е * 
РЮІМТІЖ" D 

Ай PRIMTI#Æ" . Ы 

ig PRIMTIE" M 
ЕКІНТІ" > 
Teapa" p" 

GATA 209 

[+] 

d FOR Tei 


ғ 


TA 186g: MET 


280.14: POKE 93281,14 


Do GOT 1d 
A SOTH 818 85 


Rôle ha lign rogr amm z2 age 


Ligne 5: Initialisation à © du compteur numérique. Le 
compteur augmentera de 1 à la ligne 460. 

Ligne 10:  Initialisation avec une ch ° (des guillemets 
qui ве suivent) du compteur chaîne de caractères. Le compteur 
augmente de 1 caractère à la ligne 440. Ce caractère fait 
avancer le curseur d'une colonne (no Z page X5). 


NOTE: Les lignes 5 et 10 peuvent étre enlevées du programme 
рағсе que ces variables de contróle sont initialisées 
à O et avec une chaîne vide. Dans ce cas le C64 se charge 
de les initialiser. Je te conseille de laisser quand mé 
me ces lignes pour faciliter la compréhension du listing. 


Ligne 15: Les mémoires 52280 et 53281 sont les registres pour 
la couleur du fond de l'écran et du cadre. Avec FOKE tu 
introduis les valeurs 14 et 14(bleu clair) dans ces mémoires 


Ligne 20: Efface l'écran et descendsle curseur de 2 lignes 
(Nos 1 et 5 p. 38) 

Lignes 25a40: Elles affichent un soleil et ses rayons au coin 
droit de l'écran (voir les codes-caractères d'écran page 75). 


Ligne 45: Test (C S ТЕС?) pour savoir si le curseur (ici 
l'ensemble des oiseaux) a avancé de 11 colonnes ou plus (>=), 
Si OUI alors mettre О dans les registres 53280 et 52281 (nuit) 
et aller à 1a ligne 70. Si NON continuer le programme à la 
ligne suivante. 


Lignes SO et 65: Elles mettent le soleil de Couleur rouge et 
les rayons oranges (voir tab. des codes-couleurs d'écran page 
38). 


Lignes 70 à 85: Le soleil devient une étoile (nuit) avec 1а 
couleur blanche. 


Ligne 90: Test CTP SRE) pour savoir бі le curseur Cici 
l'ensemble des oiseaux) a avancé de 10 colonnes ou moins (<=). 
бі OUI alors imprimer les oiseaux de couleur noire et aller A 

E. 


la ligne 100. бі NON le programme continue à la ligne 95 
(c'est la nuit). 


Ligne 95; Imprime les oiseaux de couleur bleu foncé (voir le 
no 6 dans le tableau des caractéres de commande des couleurs 
page 74). 


Lignes 100 à 240: Forment un bloc qui imprime les oiseaux avec 
les ailes tournées vers l'arrière. La variable I$ fait avancer 
le curseur à droite une fois à chaque itération. Elle doit 
donc apparaftre après chaque FRINT pour que les 7 oiseaux se 
déplacent ensemble vers la droite. 


86 


Ligne 250: Boucle d'attente de 20/1000 seconde. 


Ligne 255:  Remonte le curseur de 16 lignes. 

Ligne 270: Si la variable ІФ du compteur de colonnes vaut '"29 
fois curseur à droite' alors aller à 460 car l'oiseau qui forme 
la pointe du V a atteint l'avant dernière colonne. 


Lignes 280 à 420:  Forment un bloc qui affiche les oiseaux avec 
les ailes tournées vers l'avant. L'affichage des oiseaux se 
trouvera à coincider avec le dessin des lignes 100 à 240 à 
cause du curseur qui a été remonté (voir ligne 255). Nous 
aurons ainsi un battement d'ailes par colonne. 


Ligne 450: Comme à 1a ligne 250. 


Ligne 440: La variable If augmente de 1 caractère (voir 
"notion de compteur" page 80). 


Ligne 450: Reprend le programme à la ligne 20 (nouvelle itéra- 
tion) jusqu'à ce que le TEST de la ligne 270 soit VRAI. 


Ligne 460: La variable J augmente de 1. 
Ligne 470: Boucle d'attente de 1 seconde. 
Ligne 480: Méme chose qu'à la ligne 15. 


Ligne 490: бі les oiseaux ont parcouru 2 fois l'écran 
alors......ligne S10. 


Ligne 500: Sinon recommencer le mouvement depuis le début avec 
7 oiseaux à gauche de l'écran. 


Ligne 510: Boucle infinie qui empéche l'affichage de READY. 


omparaison des VITESSES d'EXECUTION entre PRINT et POKE 


Dans le programme C-2, page 85, l'animation des oiseaux se 
faisait avec l'instruction FRINT et les caractères de commande 
d'affichage (page 35) et de couleurs (page 74). 11 за fallu 
mettre deux boucles d'attente pour ralentir le mouvement... 


Dans le programme C—-3 de la page suivante, l'animation des 
Oiseaux se fait avec l'instruction РОКЕ et tu verras que le 
mouvement est plus lent malgré l'élimination des boucles 
d'attente et l'emploi d'une technique: la balançoire (p. 89) 
qui permet de diminuer le nombre d'instructions РОКЕ. 


On peut conclure que l'animation est plus rapide avec 
FRINT qu'avec FOKE. Cependant il faut remarquer que l'instruc- 
tion РОКЕ offre plus de souplesse et d'élégance. De plus FOKE 
et РЕЕК (voir p.99) permettent de faire réagir des objets entre 
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eux sur l'écran, style arcade, alors que ces réactions seraient 
très difficiles à obtenir avec РКІМТ... 


5 PRIBMTUO 
14 FOR 


EI 


Va? 
қаш) 


Lista: LEP: 


SOTOSS 


PUKE E*X*192, 
РОКЕ E*X-212.L2 
eg, L2 


THEM 1368 
; THEM 120 
Май: Lis) ` Lei 


Lisa: 12=32 


Шел THEM END 


à GOTO 18 


EXERCICE 41-A Remplis l'écran avec des caractères coeur (rouge) 
en utilisant l'instruction FRINT et fais imprimer 
(en blanc) le temps requis pour remplir l'écran 


5 PRENT' DS 


LD тату, (voir: horloge p.66) 
18 FÜR Тай TO S939: PRIMT'DMe":: MERT 

За PRIMT'ZW'"TIZÁGSA-?"SECOMDES" — 2.87 secondes 
EXERCICE 11-В Remplace FRINT par РОКЕ dans l'ex. 14-А, ligne 15 


8 PRINT"; 

18 тат бй 

15 FOR Isa ТП 999: POKE ійее-і,.83: POKE S52236-1.2: МЕЯТ 

20 PRIIMTI TI Gier" SECOM Weg d 


вв 


techniques: LA N RI 


La technique de la balançoire permet d'obtenir 
alternativement OUI et NON lors du passage par l'instruction de 
TEST (IF...). Cette alternance est rendue possible grace à une 


variable auxiliaire qui prendra la valeur un apres QUI et zéro 
après NON. 


Nous utiliserons cette technique dans le programme C-3 
(animation des oiseaux avec FOKE page 88). Les ailes seront 
alternativement vers l'arrière puis vers l'avant selon que la 
variable auxiliaire Z sera égale à zéro ou à un. 


L'organigramme ci-dessous t'aidera à mieux comprendre 
cette technique. "Je veux que les ailes soient tournées vers 
l'arriére" quand X vaut 16, 18, 20, 22,... 5h "et tournées vers 
l'avant" quand X vaut 17, 19 , 21, 23... 53. 


Explications page 90. 
Lignes du programme C-5 


к; 


Ligne 5 


Augmenter X 
de un Ligne 130 
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Organigramme de la page 89: (explication) 


Ligne 5: La variable auxiliaire 2 prend, au départ, 1а valeur О 
Ligne 10: La variable X est initialisée à 16; cette colonne 16 
est celle de l'oiseau qui se trouve à la pointe du V. 


Ligne 20: E contient la mémoire d'écran de la colonne О rangée 
10 (il y a une rangée О!) et N contient le code-caractère Ві 
qui forme le corps de l'oiseau. 


Ligne 25: Instruction de TEST (IF): Z est-il égal à О? А La 


Lêre itération: Хсіб et 2-0 donc le test fait "balancer" vers 
la gauche (OUI) et Z prend la valeur 1. A la 2ieme itération: X 
augmente de 1 et comme Z n'est plus égal à О, le test fera 
"balancer" vers la droite (NON) et de nouveau 2 prend la valeur 
о, 


Ligne 50: бі la réponse au test est OUI: Mettre 1 dans Z, 7$ 
dans Li et 75 dans L2. Les caractères 73 et 75 forment les 
ailes des oiseaux (ailes tournées vers l'arrière). Si Та 


réponse est NON: mettre O dans 2, 85 dans Li et 74 dans 12. 
Les caractères 85 et 74 forment les ailes tournées vers 
l'avant. Voir page 75. 


Conclusion: Chaque fois que la variable X contiendra un nombre 
pair, les ailes seront tournées vers l'arrière et avec un 
nombre impair les ailes seront tournées vers l'avant. 


Il faut remarguer que la méme série d'instructions POKE 


(lignes 35 à 65) est parcourue Z fois à l'intérieur de la 
boucles: (gain de mémoires) 

1- affichage des oiseaux avec les ailes tournées vers l'arrière 
2- les oiseaux recoivent la couleur rouge (code 2 page 28). 


Ar les oiseaux sont effacés (caractère 52). 


EXERCICE 12 Utilise la technique de 1а "balançoire" pour que 
les 2 caractères graphiques (SHIFT F inversé et rouge) 
et (SHIFT М) s'imprimemt alternativement à la suite de 
la séquence précédente, sur 20 rangées et avec retour 
chariot à chaque 'PFRINT' (2 fois le méme caractère à chaque 

š itératien) 

18 мш ' 


Әй FOR Іші TO 2@ 

SA IF м=й THEM Mei: Džepna T: GOTO 68 
ФЙ май 

E Шарт" 

Єй PRIMT Dë . (No 15; Ne 3 p. 7h) 

ТЯ HEMT 1: РЕТТИ 


Tu reconnais la technique de la balançoire qui permet 


alternativement d'imprimer [7 F et 


UT NON j OUT DEN | 
premier deuxième қ premier deuxième 


caractère caractère caractère caractère 


Les explications seront assez brèves dans ce premier 
volume. 11 ya “opérateurs logiques qu'on appelle aussi 
opérateurs booléenss NOT, AND, OR. Ces opérateurs prennent 
place dans une instruction IF... 


1- L'opérateur négation logique МОТ (non). Exemple: 
IF МОТ А THEN 60 Branchement à la ligne 60 si le con 
tenu de la variable А est faux. 


ез 


2- L'opérateur logique AND (et). Exemple: 

IF В-21 AND С-28 THEN 40 Si les valeurs de B et C sont 
vraies simultanément, cette expression logique sera vraie et 
il y aura branchemet à la ligne 40. (Voir chapitre V pour avoir 
de plus amples informations). 


5- L'opérateur logique OR (ou). Exemple: 

Remplace la ligne 25 du programme C-3 (page 88) par: 
25 IF X«8 ОК Х=10 OR X=12 OR X=14 OR Х=16 OR X=18 OR Х=20 OR 
X=22 ОК X=24 OR X26 OR X228 THEN L1z73:L2-275:GO0TO 35 


NOTE Tu constates que ta ligne 25 contient plus de ВО 
caractères. Une ligne de 80 caractères correspond à 2 lignes 
sur l'écran du C64 (2 X 40); le No de ligne est inclus dans ces 
80 caractères, Quoi faire avec cette ligne 257 


E 


ІІ уа 2 solutions: 


a) place le 'IF' immédiatement après 25 et ne laisse aucun 
espace dans ta ligne...8i celle-ci possède encore plus de ВО 
caractères, alors écris les instructions en abrégé: (G et SHIFT 
Ü) pour GOTO (Т et SHIFT H) pour THEN... 


b) Zième solution: si le nombre de caractères est toujours 
supérieur à ВО, alors partage ta ligne 25 avec une ligne 26 qui 
commencerait aussi par IF avec les mêmes valeurs réécrites 
après THEN dans les deux lignes. 


Lignes 25 et 26: бі une des onze valeurs de la variable logique 
X est vraie ALORS L1z732:L2-75:60LLER à 35 

Si aucune n'est vraie l'exécution du programme 
continue à la ligne 50. 
ЖО L1-z85:L2-274 (ailes vers l'avant). 


Ce temps consacré aux lignes 25 et 26 te sera utile. 
Cependant je te conseille, dans un cas semblable, d'utiliser la 
technique de la balançoire. (Voir chap. 5 pour d'autres 
explications sur le OU logique) 
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Etude de six fonctions: E SP T $ 


ек [FRECO 


Une fonction est toujours suivie de parenthèses entre 
lesquelles tu mets l'argument de cette fonction. 


La fonction SPC, espace, (anglais: SFaCe) met des 
caractères 'espaces' à partir de 1а position courante du 
curseur. L'argument est le nombre d'espaces que tu veux créer 
(D à 2552. 


EXERCICE 15 Mets le C64 à “ОМ” et écris ce programme d'édition: 


18 PRIHT"TIBULLETIM'"SPCZZAS"SECOMDRHIRE v" 
Әй PRIHT"ELEVES"SPCK 1 "МОТЕМНЕ күш" 


Ecris: PRINT FRE (O) +65536 RETURN 


L'écran affiche Z88ll. C'est le nombre d'octets (bytes) 
disponibles. (FREE) 


Tu peux obtenir le méme format d'édition en utilisant La 
barre d'espacement pour mettre des espaces. (Note: РКІМТ SFC (20) 
fait imprimer 20 espaces. Donc il positionne le curseur à 20 + 
Ty. 


EXERCICE 14A Fais l'expérience: 


18 PRIHT"CIBULLETIHM SECONDAIRE м" 
2@ PRINT'ELEVES МОТЕНМЕ RS" 
Ecris: PRINT FRE (0) +65556 RETURN 


L'écran affiche 28815... nombre d'octets disponibles. 


La fonction FRE, libre, (anglais: ҒКЕв) te permet de 
demander au C64 combien il lui reste d'emplacements mémoire 
disponibles pour ton programme. L'argument (0) peut étre 


remplacé par un nombre quelconque. 


Dans le premier cas: 58841 octets libres 
Dans le deuxième cas: 28815 octets libres 


Donc en utilisant la fonction SFC tu as sauvé 26 
emplacements mémoires dans 1 seule ligne BASIC. Chaque fois que 
tu appuies la barre d'espaces tu prends une mémoire... бі “Ең 
as plusieurs espaces à imprimer il est préférable d'utiliser la 
fonction SFC. 


NOTES 1- SFC(O) n'a aucun effet. 
2- бі l'argument est une expression non entière le C64 
convertira l'expression en un entier. 
3~ Four obtenir plus de 255 espaces, par exemple 400, 
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Г? Voir EXERCICE Ш-В page 180 


tu écris:  SPC(255), SFC(145) ` 
4- L'expression suivante te dira à chaque instant le nom 
bre de МЕУ (RAM): PRINT FRE (0O) – (FRE (O) <0) «65556 


[тав‹ > 


L'argument (paramètre) de la fonction TAB est une variable 
ом une constante entière (О à 255) qui indique la position ой 
l'on doit commencer une impression. бі le paramètre est < О le 
Có4 indiquera ce message: ILLEGAL QUANTITY 


Son rôle est semblable ам TABulateur de la machine A 
écrire. 


EXERCICE 15 


© PRINT" 
18 PRIMT"RCHRTS"TRBGIOD"PRIA"TRHBGZAD"VEHTES"TRES3d "PRIX" 


Cette dernière instruction imprimera prix à partir de La 
colonne 10 puis imprimera vente à partir de 1a colonne 20... 


11 ne peut y avoir superposition de deux impressions. Far 
exemple si par erreur tu écris TAB(2) au lieu de ТАБ(20), VENTE 
s'imprimera immédiatement après prix. Lorsque tu utilises 
plusieurs fois la fonction TAB dans une mème instruction, 
l'argument de chacun des TAB correspond à la colonne © du début 
de la ligne. 

Note Lorsque le paramètre de ТАН amène le curseur sur une Ze 
rangée de l'écran, le paramètre du TAB suivant comptera A 
partir du début de cette 2e rangée. 


L'argument de la fonction TAB peut étre une expression 
arithmétigue. Ceci permet de faire des tracés approximatifs de 
fonctions. Seule la partie entière sera utilisée pour définir 
la position du tabulateur. 


EXERCICE 16 Fais imprimer sur l'écran le tracé d'une courbe 
ayant l'allure d'une parabole. 


18 PRIMT"D: Cd 

12 FOR 1-11 TO 1 STEP-1 
28 PRIMT ТАЯТА wu 

28 HEMT I 

30 FOR Zei TO 11 

37 PRINT TARIHI en 

4й HERT 1 


EXERCICE 17 Оп utilise la fonction TAB pour déplacer des objets 
sur l'écran (méthode des FRINT). En voici un 
exemple dans ce programme qui déplace un tank de 
gauche à droite et de droite à gauche? 


PRIHMT"TCIEIAGE À GAUCHE" 

FRIHT HE À TIROITE 

PRIHT'WWEPPLITE UNE TOUCHE 

DETA: ТЕВЕ" "THEN 2@ 

АҒЫ ыы аа ай PO EGG, 128 


PRIHTTHR PE uc 
PRIMTTRBECO" 77-5 

РЕІНТТАВЕС ОР" 
PRIHTTRBZC»"OOOOnO" 

o0 PRIMI CITIIY; 

GETBE:IFBHE-"G" OR B£-"H" THEM 75 
| BATO op 
FRIMTTRBE 
FRIMTTHEB: 


PRINTTRE« 
3*5 PRIHMTTRBZCO 

1 да ERIMISTTIIITS 
110 IF В#="0" THEM Cell: GOTO 
120 IF RB#="H" THEM Ceci: GOTO 


t id 
= =< 


Le hic de ce programme réside dans la fonction ТАЕ! 
L'argument de TAR(C) est la variable C qui peut prendre les 
Valeurs О à 35 et 35 à О et ainsi déplacer tout le dessin à 
droite ou à gauche sur l'écran. 


Lorsque le dessin occupe une nouvelle position sur 
l'écran, il faut que le dessin précédent soit effacé. C'est le 
rôle des lignes 75 à 95. 


Les lignes 110 et 120 changent la valeur de l'argument C 
en plus ou en moins selon que le tank se dirige vers la droite 
Ou vers la gauche. 


La ligne ЖО empéche l'argument C d'atteindre une valeur 
inférieure à zéro, ce qui provoquerait un message d'erreur 
(illegal quantity). La ligne 35 empéche 1 ‘argument e 
d'atteindre une valeur supérieure à 55, ce qui ferait dérouler 
l'écran et déformer le dessin. 


Il faut noter aussi la mémoire 650 de la ligne 25. Cette 
adresse 650 contient normalement la valeur O mais quand tu mets 
128 dans la mémoire 650, tu rends toutes les touches du C64 
"répétitives"...(comme les touches CRSR). Si tu tiens  enfoncée 
l'une ou l'autre des touches G et H, le tank se déplacera 
jusqu'à la colonne zéro ou jusqu'à la colonne 35 (arrière du 
tank). Mets sur cassette le programme de l'exercice 17. 


L'instruction GOSUR (chapitre IV) te permettra 


d'économiser plusieurs mémoires lorsque tu transformeras le 
programme ci-dessus. 
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Le code ASCII (American Standard for Communication 
Information Interchange) est le code américain pour communiquer 
et échanger des informations 


La fonction ASC, comme toutes les autres fonctions BASIC, 
est suivie de parenthèses entre lesquelles tu mets un argument. 


L'argument de ASC est l'un des caractères  alphanumérigues du 
tableau de la page 76. N'oublie pas que ces caractères doivent 
étre placés entre des guillemets. 

EXERCICE 18 Ecris: 

PRINT ASC ("A") RETURN 


L'écran affichera 65. Consulte le tableau de la page 76 
et tu verras que 65 correspond bien à la lettre A. 


EXERCICE 19 Ecris en mode direct: 
A#="ANDRE": FRINT ASC(A#) RETURN 


L'écran affichera encore 65 car la fonction ASC fournit 
une valeur numérique qui est le code ASCII du premier caractère 
(octet) de la chaîne. 


127 et 192 à 223, sont équivalents. De méme 126 est équivalent 
à 255 E 


295. Ainsi le code du caractère "pique" est 97 et aussi 195. 
EXERCICE 20 Ecris: 


PRINT ECC A") RETURN. L'écran affichera la plus 
(SHIFT oi grande valeur, soit 193 


Генве c » | 
L'argument de la fonction CARACTERE CHRE (anglais: 
CHaRacter) est l'un des codes (un nombre) du tableau de la 


page 76. 


Avec FRINT tu obtiendras le caractère chaîne correspondant 
au code de 1 ‘argument. 


EXERCICE 21 Ecris: 
ЕКІМТ CHR#(97) RETURN. 


L'écran affichera le caractère chaîne: pique. Ти obtien- 
dras aussi un pique avec CHRE(193). 


Je te conseille de faire plusieurs exercices pour te 
familiariser avec cette fonction. Utilise différentes valeurs 
du tableau de la page 76 et vérifie les résultats. 


Exemple: Il y a 4 touches à droite du clavier: #1, f3, #5, #7 
et avec SHIFT: f2, f4, 46, fB 


EXERCICE 22 Ecris un petit programme qui attend la touche fi: 


10 GET A£:1F At <> CHRE(13Z) THEN 10 
20 PRINT"TU VIENS D'AFPFUÜYER SUR LA TOUCHE Fi" 


Appuie sur différentes touches et tu constateras que seule 
la touche fl permet au C64 d'exécuter la ligne ZO. 


Autre exemple: la seule façon d'imprimer le caractère 
guillemet dans une chaîne de caractères est d'utiliser la 
fonction CHR#. Consulte le tableau (page 76) et tu trouveras 
le code 54 pour les guillemets. Exemple 


EXERCICE 23  Ecris: 


10 FRINT'ELEVES SECONDAIRE III" 
20 PRINT"  "CHR£f$(G4)" "CHR$£(CS4)" (7 espaces) Ім" 
ЖО FRINT"  "CHR£(34)" "CHRE((Z4)" (B espaces) AM 


Tu peux employer la fonction CHR£ pour imprimer tous les 
caractères du tableau de la page 35. 


Il faut bien noter que si le paramètre de la fonction 
CHR£( ) est le code d'un des caractères de COMMANDE d'affichage 
ou de couleur, ces caractères ne seront pas affichés sur 
l'écran mais ils joueront quand méme leur rôle au moment de 
l'exécution du programme. Exemple: 


EXERCICE 24  Ecris: 


10 PRINT CHR#(147) 
20 PRINT CHR#(18) "FIERRE" 
50 РКІМТ CHR# (145) CHR# (5) "JOSEPH" 


Vérifie dans le tableau page 76: 147 efface l'écran; 18 
met en contraste inversé; 145 remonte le curseur d'une rangée: 


5 donne la couleur blanche. 


EXERCICE 25 Ce programme trace une ligne horizontale qui s'im- 


prime sur les 40 colonnes de la rangée 25 sans 
faire dérouler l'écran. 
(23 CRSR bas) 
D FAR I AT UMIBIÉDNDEDROEDEDETEDNTIONTHTHTHTHTRIN aa 
18 FÜR Tel TO dë: IF I-48 THEM PRINT CHRECISTSCHRESZ 1482; 
әй PRINTI”; 
aa MERMT i 
ad ӨШТІ) dë 
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Le code 157 fait reculer le curseur d'une case! le code 
148 est celui de la touche INST; donc CHR#(148) fait une 
insertion, c'est-à-dire qu'il déplace d'une case à droite le 
caractère sur lequel le curseur se trouve positionné. Un trait 
horizontal se trouve maintenant sur là dernière case (1000) et 
le curseur est sur la case précédente. Lorsque le programme 
exécute la ligne 20, il met un trait à l'endroit préparé pour 
l'insertion (case 999) et le curseur se déplace sur la case 
Suivante. 


NOTE  L'emploie de INST introduit automatiquement le mode 


guillemet. 


EXERCICE 26 Change la ligne 10 de l'exercice 25 en utilisant 
des caractères de COMMANDE au lieu de la fonction CHRE 


18 FOR Іші TO 40: IF [=4й THEN PRIHT'WR"; 


Мете s'ils se ressemblent, les deux caractères entre les 
guillemets sont différents. Le premier est le[no 4 page 35] et 
le deuxième est le no 0 page =] Le symbole de ce caractëre 
по 10 est un rectangle en contraste inversé avec une colonne 


éteinte (l'avant dernière, à gauche); c'est се caractère qui 
permet de faire des insertions à l'intérieur d'un programme. 


Avant de passer à l'étude de la fonction PEER; Cu vas 
faire un exercice plus élaboré qui résumera plusieurs notions 
apprises... 

EXERCICE 27 Fais imprimer 3 cartes de тете format et laisse 5 
secondes d'attente avant d'effacer le dessin précé- 
cédent: ire carte, soirée dansante: 
2e carte, un deuil; 3e carte, bonne féte. 


5 PRINT": POKE S3281.1 

18 WEzCHREQI2OIMCHRECAZ3): REM Қай! 

28 FOR Іні TO 3 

ЗӢ IF Isg THEM E£sCHRECIGOITCHRELIi4d4)COHRECUZ0: REM Маш н" 
dë IF Tes THEM W$£sCHRÉ£t3124CHREZLiGG?: REM Wës an 

50 PRINT” MNBL" ; --Э(НСМЕ, 5 CRSR bas, 10 СЕЗЕ droite) 
Ей FOR Jei ТО 20: PRINT 8%): ЕПЕТшіТОІЙЙ: MEXT: HET 

TU FOR Jel TO 10: PRINT HEMN": FOR Te] TO 108: MEXT: HEXT 
ӘЙ FOB Zei TO ap PRINT Mët: ` ЕОЕТа TO 189: HEST: HET 
Эй FOR Jet TO i18: PRINT HENE: FORTei TO 106: HEST: HEMT 
188 IF Іші THEM РМІМТ "ИМЕНЕ SFL 142 SOIREE” 

118 IF Ізі THEM FRINTSPCCS43"DRHMSHHTE "SPCCT1s"21 HEURES" 
IF Jeë THEM PRINT" MDI" GE о SU" IL " 

IF I=2 THEN PRIMTSPCIS42USREP "SPCCTZ32"EM PRIMI " 
IF Тез THEM PRINT" MMMM" SPCOIIA2"BOMME ош! 

IF Lä THEN PRIHTSPCOS42"FETE MOM"SPCZTIOo" ТОШТО w " 
FOR Tel TO sQQQ: HET 

A МЕНТІ 

i88 РЕ1ЧТ" ИШ 


Analyse chacune des lignes de се programme et ensuite 
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transforme-le selon tes goûts et ton talent. Tu peux 
facilement faire mieux!...Tu peux écrire les lignes 100 а 150 
sur 3 lignes BASIC au lieu de 6. Nous les avons partagées pour 
qu'elles n'empiétent pas sur la marge de cette page. 


Tu peux dire avec fierté que tu connais maintenant trois 


odes pour obtenir le méme caractère sur l'écran.  Prenons 
comme exemple le caractere B 


ire méthode:  FRINT"'E" L'écran affiche В 
2e méthode:  FRINT CHR# (66) L'écran affiche E (page 76) 
Зе méthode: FOKE 1024,2 (+couleur) L'écran affiche В (p. 75) 


г l'origine. Tu peux changer 1024 pour 


une autre adresse de l'écran... 


L'argument de la fonction РЕЕК est toujours une des 65535 
mémoires du C64. бі tu mets PRINT devant FEEK( ), l'écran 
affichera le contenu de cette mémoire. 


Le contenu d'une mémoire est toujours un nombre entier 
compris entre O et 255. C'est un octet (anglais: byte). 


EXERCICE 28 Ecris en mode direct 
PRINT PEEK (93281) RETURN 


L'écran affiche 6. C'est le code de la couleur normale du 
fond de l'écran: bleu foncé. 


EXERCICE 29-A Utilise l'instruction FOKE pour mettre le 
code 15 (gris clair) dans le registre 53281. 


FOKE $3281,15 RETURN 


EXERCICE 29-B Utilise la fonction FEEK pour voir si vraiment 
le code 6 a été remplacé par 15 dans La mémoire 
53281: 


PRINT РЕЕК (855281) RETURN. L'écran affiche 15. 


Avant de passer au FROJET D-2, nous allons solutionner un 
problème laissé en suspend au milieu de la page 43. Il serait 
bon que tu relises l'exercice 9 page 42 ой l'affichage du 40e 
coeur faisait dérouler l'écran. 


Voici cette Зе solution avec la fonction FEEK. La mémoire 
214 contient le numéro de ligne de 1а position du curseur. 
Guand le curseur imprime la ligne 24 il suffit de lui dire 
qu'il est sur la ligne 23. 
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Lorsque le Có4 imprimera la rangée 24 (la dernière), il ne 
fera pas dérouler l'écran car il se croira sur la ligne 23! I1 
pourrait t'arriver quelque chose de semblable si tu habites au 
24e étages et qu'un malin s'avise de changer les numéros des 
boutons de l'ascenseur... Tu pourrais aussi te croire au 23e 


étage! 


EXERCICE 3O Ecris le programme suivant 


5 FRINT CHR£(147)1; 

10 FOR X=1 TO 25 

15 IF РЕЕК(214) «24 THEN POKE 214,23 
20 PRINT CHR#£(115) 

ЗО NEXT 

40 GOTO 40 


Tu as réussi à tromper le C64 sans le mettre "hors de 
lui-méme"... Mais il y a d'autres tromperies qu'il "prend mal" 
et alors il va afficher une série de caractères heureusement 
incompréhensibles... Tu n'as plus d'autres solutions que 
d'éteindre et rallumer pour retrouver ton C64 en pleine forme 
сағ il aura "tout oublié" ... méme le beau programme que tu 
préparais! 


11 faut donc étre prudent quand tu emploies РОКЕ car c'est 
toi qui peux te tromper sur l'adresse ou le contenu de 
l'adresse... Le C64 ne sera jamais endommagé par ces erreurs. 
La prudence est recommandée simplement pour éviter la perte du 
programme que tu es en train de batir. 


Exemples: la mémoire 788 contient normalement la valeur 
191. Contrôle cette affirmation en écrivant: FRINT PEEK (788) 
RETURN. Ensuite entre (load) un des programmes que tu as 
implantés sur Жа cassette (évidemment le programme de ta 
cassette demeurera intact). 


Ecris: РОКЕ 780,0 RETURN.  Ecris: LIST... RUN... Rien à 


faire, l'insulte est trop sérieuse! il faut éteindre et 
rallumer. 11 arrive souvent que l'erreur ne soit pas fatale: 
alors tu peux récupérer ton programme si tu appuies 


simultanément sur STOF et RESTORE. 


EXERCICE 31 Ecris un programme qui remplit l'écran avec 1000 
petites cases bleues. Utilise la fonction FEEK 
pour éviter le déroulement de l'écran! 


5 PRINT": 
ій FOR Іші TO 1008 

15 IF PEEK(214)=24 THEM POKE 214,23 
2ü PRINT "T"; 

88 NENT (SHIFT P) 

40 GOTO 4d 


L'écran est rempli de petits rectangles bleus. Cet 
exercice permet de visualiser les 1000 cases du bloc mémoires 
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écran (25 X 40). Efface la ligne 15 et tu verras l'écran 
remonter de 4 rangées, c'est-à-dire d'une ligne BASIC. 
EXERCICE 31-B : Voir page 100 
ЕХЕНСІСЕ 32-А Le but de cet exercice est expliqué à 
l'intérieur du programme dang des instructions REM. 


id PRINT PEEK AST 
ей Метт 
38 IF PEEKG 1979 <> Gd THEM 38 
ЗЕ REM MMMTEMPS ECOULE РЕНШАМТ QUE TU TIENS LA 
35 REM TOUCHE “КЕТПЕН” МО 15» ENFONCEE### 
4й PRINT ТІН "ЗЕШІМПЕС6)! 
Du PRIMT РЕЕКХ19727 
Le tampon clavier prend une importance capitale avec FEEK. 
Nous y reviendrons dans le chapitre V. 
EXERCICE 32-B : La fonction PEEK permet de déceler les collisions...(Voir page 180) 


READ DATA RESTORE 


Quand tu ав une liste de constantes il est souvent 
avantageux de les écrire dans des instructions DATA et séparer 
chaque donnée (constante) par une virgule. 


Le rôle de l'instruction READ est de lire chacune des 
données contenues dans les instructions DATA. 


Exemple: Supposons que tu as fait cing devoirs de 
mathématique et que tu as obtenu les notes suivantes: BO, 75, 
78, 69, 85. Supposons aussi que tu prends la variable N pour 
représenter chacune des notes. 


EXERCICE 55 ler cas: Ecris seulement les 3 lignes suivantes 
10 READ М 

20 FRINT М 

30 END 


Aprés RUN et RETURN tu lis sur l'écran: OUT OF DATA 
ERROR IN 10 


L'ordinateur cherche les données qu'il doit lire (READ) 
dans une instruction БАТА (donnée) mais cette instruction est 
absente du programme. 


Conclusion: Dans un programme, l'instruction READ doit 
toujours étre accompagnée d'une instruction DATA. 


EXERCICE 34 2e cas: Ajoute une instruction DATA à la ligne 40. 
Cette instruction contiendra tes 
cinq notes de mathématique. 


40 DATA 80, 75, 78, 69, 85 
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L'ordinateur imprime 80 sur l'écran. Tu lui as demandé de 
lire М, c'est-à-dire la première valeur contenue dans DATA. 


NOTE a) L'instruction DATA peut étre placée n'importe où dans 
le programme, méme aprés END ou avant READ. 
b) Les instructions DATA sont des instr. non exécutables. 
c) Оп ne met pas de virgule aprés la derniére donnée. 


EXERCICE 35 3e cas: Tu veux faire imprimer les 5 données de 
l'instruction 40. I1 faut placer une boucle 
FOR... NEXT qui comptera jusqu'à cinq. 


5 FOR Ізі TO 5 

10 READ N 

20 PRINT N 

25 NEXT 

50 END 

40 DATA 80, 75, 78, 69, 85 


L'ordinateur lit la première donnée et l'imprime puis à la 
deuxième itération il lit et imprime la deuxième donnée... et 
ainsi de suite. 

EXERCICE 36 4e cas: бі tu ajoutes une itération à la boucle 
5 FOR I-1 TO 6 


Le C64 lit les 5 données contenues dans DATA et les 


imprime mais quand il arrive à la бе itération, la 6e donnée 
étant absente, il imprimes OUT OF DATA 
ERRCR IN 10 


Il manque une ou des données. 


Fais l'expérience...Ensuite tu ajouteras une óe note (te 
géne pas, vas-y avec un 100) soit dans un nouveau DATA à la 
ligne 50 soit à la suite des données de la ligne 40. 


Qu'arrivera-t-il si tu ajoutes cette бе note dans un DATA 
placé avant la ligne 40, par exemple à 1а ligne 55? Fais 
l'expérience... 


Se cas: Tu veux afficher une appréciation après chacune 
de tes notes: Excellent pour 90. Très bien pour ВО. Bien 
pour 70.  Fassable pour 60. Faible pour < 60. 


Tu utilises une variable chaîne de caractères, supposons 
А+, pour représenter les appréciations. ІІ faut noter que 
l'instruction БАТА  mémorise aussi bien des constantes 
numériques que des constantes chafnes. 


Aux lignes 10 et 20 tu ajoutes la variable A# sans oublier 
la virgule pour séparer М de АЖ. 
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А la ligne 20 tu peux mettre un point virgule entre N et 
A* pour imprimer les deux valeurs l'une prés de l'autre. 


А la ligne 40 ajoute l'appréciation après chacune des 
notes et tu obtiendras le programme suivant (nous avons partagé 
les données sur 2 lignes). 


EXERCICE 37  Ecris: 


5 FOR Іші TO 6 

10 READ N,A# 

20 FRINT:FRINT МАЖ 

25 МЕХТ 

ЖО END 

40 DATA BO, TRES BIEN, 75, BIEN, 78 , BIEN, 69, PASSABLE 
50 DATA 85, TRES BIEN, 100 EXCELLENT 


Four aérer les résultats affichés sur l'écran, il y a une 
instruction FRINTà la ligne 20 (rien imprimer équivaut à 
laisser une ligne libre). 


Dans ce programme, le С64 lit deux valeurs dans DATA а 
chaque itération: la première donnée est un nombre représenté 
par la variable numérique М et la deuxième est une chaîne de 
caractères représentée par la variable АЖ. 


REMARQUES 1~ Le programme ci-dessus est un exercice (READ... 
DATA): il y a des moyens plus rapides, plus 
rationnels et plus économiques (en mémoires) pour 
indiquer les appréciations... 

2- La chafne de caractères n'a pas besoin de guille- 
mets dans l'instruction DATA (le C64 s'attend à une 
chafne) à moins qu'elle contienne un caractére gra- 
phique ou une virgule ou deux points. 

5- La plupart des programmeurs mettent les instruc 

tions DATA à la fin du programme, après END. 


EXERCICE 38 6e cas: Tu veux que ton programme relise les 
données (dans DATA) une 2e ou une 3e fois... 


Si tu recommences la boucie des nos 5 à 25 en mettant GOTO 
ы dans 50, qu'obtiendras-tu sur l'écran? Fais l'expérience... 


Ton C64 affiche les notes et les appréciations mais il 
refuse de recommencer. Il écrit: QUT OF DATA 


ERROR IN 10 
La solution est dans l'instruction RESTORE. 
А chaque lecture d'une donnée dans DATA, l'interpréteur du 
C64 déplace un pointeur (ou indicateur de lecture) vers la 


prochaine donnée... et quand la lecture est terminée, le 
pointeur demeure à la fin des données. 
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L'instruction RESTORE (rétablir) remet le pointeur au 
début de la lière instruction DATA du programme et le C64 est 
рғее à relire les lignes DATA (voir le programme D-2: Québec 
chante). 


EXERCICE 59 Remplace la ligne 30 par celle-ci: 
J0 RESTORE: GOTO 8 et prépare-toi à appuyer sur STOF 


EXERCICE 40 L'ordinateur relit et affiche les données sans 
arrét. Si tu veux qu'il lise 2 fois il faut ajouter 


lignes 28 et 30 pour sortir de la boucle. 


z C=0 

5 FÜR Ізі TO 6 
10 READ N,A# 
20 PRINT МАЖ 
25 NEXT 

27 C-C41: IF C» 
28 PRINT 

ЖО RESTORE: GOTO 5 

40 DATA BO,TRES BIEN,75,BIEN,78,BIEN,69, FAGGSABLE 
қо DATA 85,TRES DIEN, Loo, EXCELLENT 


THEN END 


Photo du projet D-1, pages 30 et 33. 
Ce sera plus joli en haute résolution (volume 2) 
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P RAMMAT ION 


Le processeur 6581 est le coeur du synthétiseur de 
son/musidque (Ж voix) de ton COMMODORE 64. Les Américains 
l'appellent le SID: Sound Interface Device. Le SID possède 29 
registres ou mémoires (54272 а 94100) qui contrôlent les trois 


Four que ton Có4 produise des sons, il faut que tu fasses 
les 6 opérations suivantes: 


ADRESSES 
(VOIX 1) 
1- Mettre "du volume" (intensité du son) 54296 
2- Préciser l'enveloppe de l'onde c'est-à-dire 
les variations d'amplitude... (AD et SR) 54277 et 54278 
5- Donner sa fréquence (Hte F. et Basse F.) 54275 et 54272 
4- Mettre à "ON" le registre de la 
forme de l'onde. (Bit zéro à 1) 54276 
5- La durée du son (Boucle d'attente... 
6- Mettre à "OFF" le registre de 1а 
forme de l'onde. (Hit zéro à Q) 54276 
EXERCICE 41-А Ecris ce programme et tu entendras un extrait de 
la chanson: "mon beau sapin" jouée à l'orgue: 
5 REM ORGUE Opérations: (Voir ci-dessus) 
18 POKE "4296.15 ~ ation No 1 
Әй PIKE 4077, : РОКЕ 54270., 240 ———— ——»Üüpération No 2 


ЗИ КЕНІ HF. DE, DU: IF HFe-1 THEM ЕМІ 


4а POKE SARA HF: PAKE Зара, ВЕ —————» üpér ation No X 
Ей POKE ARTE. 17 6—5 üpération No 4 
Єй FÜR "Teil TO LL: HEMT ——————— —— üpération No S 
70 POKE 94276,16: FOR Tel TO 28:MEMT——— — — > üpération N 6 


ай GOTO 36 

Za DATA 21.21.8912, 25, 30, 204, 25, 20. 120, 25, 80,518 
"i8 DATA SA, A. TLE 41, LES. 964,41, 165, 120,31, 165, 768 
5z8 DATA 25,30, 296,28, 49,286, 01, 168,286, 42, LS TIE 
E38 DATA 23.191, LE. 28, dû, 512, 2%, 34,518 

Sad DATA —-1,-1,-1 


La ligne. 20 lit (READ) 5 données dans DATA: haute 
fréquence (HF), basse fréquence(BF) et la durée(DU) de 1а note. 


La ligne 80 retourne à la ligne ЖО pour lire (READ) les 3 
données suivantes... 
SL (IF) la première des 3 données (HF) est égale à -і, ALORS 
(THEN) ie programme est terminé (END). 
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EXERCICE 41-B Le premier registre du SON est à l'adresse 
54272. Mets la valeur 54272 dans 1а variable 5 
(SON) et refais l'exercice 41-4 en tenant 
compte de cette variable. Ca va aider ta mémoire! 


8 eigara : REM ORGUE 

14 POKE 824,1 

28 POKE қай : POKE Gë, du 

aa КЕНІ HF. BF, Du: IF HFe-1 THEM END 

AG POKE S+l. HF: POKE Su DE 

SE POKE S+4,17 

Ей FOR Tei TO DL: NET 

Та POKE S4-4.16: FÜR Teil TQ RAHET 

ай GOTO SA 

FG DATA 21,.31.512,25,38,384,25,30.128, EE 
ій DATA 28,49,2512.31,162,384,31.152.120,31.1692,768 
әй DATA 25, 30. 296, 28, 49, 256, 31, 165, 256, 33, 135, 512 
"30 DATA ER. IBi Td AE 49,512, 25, 40,912 

S48 DATA -1,-1.-1 


EXERCICE 42 Si tu veux que la chanson de l'exercice 41-E 
soit jouée au xylophone, change l1'ENVELOFFE de 
l'ONDE à la ligne 20 en mettant 9 à la place 
de O et de 240: 


ds Í 
20 FOKE 6%5,9: FOKE 5%6,9 no 


EXERCICE 43 Four changer le timbre d'un son, tu changes la 
forme de l'onde (lignes 50 et 70). Оп utilise 
l'onde à dents de scie pour le violon parce 
qu'elle contient toutes les harmoniques. Change 
les lignes 20, 50 et 70 de l'exercice 41-B: 


20 POKE S+5,168: POKE 5+6,169 
50 FOKE GrA, A3 
70 FOKE 5-4,32: FOR Т=1 TO 40:МЕХТ 


EXERCICE 44 Utilise l'exercice 45 (Violon avec ondes à dents 
de scie) et mets 144 et 243 (AD et SR) à la ligne 
20. Tu obtiendras un son unique au synthétiseur: 


20 POKE 845,144: POKE 5-6,243 
Тш peux inventer tes propres effets sonores 


Ton С64 possède un véritable synthétiseur de musique. ue 
tu sois musicien ou non, tu dois connaître les étonnantes 
possibilités de ce synthétiseur et te servir de cette merveille 
dans tes programmes...Ce serait dommage de laisser dormir ce 
"petit Korg" à l'intérieur de ton C64! 


Four inventer tes propres effets sonores, étudie les 5 
qualités du SON: A- intensité E- hauteur C- timbre. Tourne 
la page et ATTAQUE! 


Les TROIS QUALITES du SON 


L'intensité d'un son est reliée à l'amplitude (ou volume) 
de l'onde sonore 
VOLUME 


V 
AMPLITUDE d 


un SON fort un SON faible un SON nul (silence) 


L'intensité du SON correspond au volume du SON. Quand tu 
diminues le volume de la TV pour ne pas déranger ceux qui 
dorment, tu diminues l'intensité ou l'amplitude de l'ende. 


Ton C64 peut contróler l'intensité d'un SON par le volume 
principal et par l'enveloppe de l'onde: 


1- Le volume principal est à l'adresse 54296 (pour les 3 voix) 
et tu peux mettre à cette adresse une valeur comprise entre © 
(silence) et 15 (maximum). 

Note importante: tu mets 15 dans 54296 et tu utilises la 
Zième manière, beaucoup plus efficace et raffinée pour 
contrôler le volume de l'onde en précisant le profil de son 
enveloppe: 


2- L'enveloppe d'un SON 


Le volume d'un SON musical varie depuis le début où il est 
émis jusqu'à ce qu'il s'évanouisse. Four mieux préciser 
l'évolution de l'amplitude on divise l'onde еп 4 phases: 
Attaque (А), Déclin (D), Soutien (S) et Relaxation (F). 


Ё 
а) L'Attaque (А) est la phase pendant laquelle le volume de la 
note passe de zéro A за valeur maximale ou sommet 
(anglais:peak). А peut valoir de о A 15 fois 16 


(9,16,32,48,64,...240). 


Exemple: si Ал О le volume atteint instantanément ва valeur 
maximale (ex. l'orgue) et si ñ = 160 (10 X 16) il faut 1/2 
Seconde pour atteindre le volume maximal (ex. violon). 


b) Le Déclin (D) est la phase pendant laquelle le volume de 1а 
note tombe à un niveau intermédiaire (anglais:Decay). D peut 
prendre une valeur comprise entre О et 15. 

xemple: si D = Q le volume prend instantanément le niveau de 
Soutien de la note (ex. trompette) et si D = 9 il faudra 
environ 5/4 de seconde pour atteindre le niveau de Soutien (ex. 
piano). 


La somme des deux paramètres À + D doit étre placée A 
l'adresse 54277 (voix 1) 

Note: L'octet (ou byte) qui contient l'information A+D est 
formé de 2 quartets (anglaiss:snybbles). 


' 
quartet haut 1 quartet bas 


Attaque : Déclin 
lox 1 Q 1 о о Q (Violon) 
4 
128 ъ 2 rB 
' 
Donc À = 160 ps8 
Et А + D = 168 —» Valeur que tu mets (FOKE) dans le 
registre 54277 (Voix 1) 


C) Le Soutien (XS) est une valeur qui définit à quelle 
proportion du volume maximum la note sera maintenue 
(anglais: Sustain). S peut prendre les valeurs О à 15 fois 16 
(0,16,52,48,64,...240) 

Exemple: Si 8 = Q il n'y a aucun Soutien (ex. piano, 
xylophone). бі 5 = 240 (15 X 16) le Soutien est maintenu au 
volume maximum (ex. orgue). 


d) La Relaxation (R) exprime la rapidité avec laquelle la note 
atteindra le volume zéro. (anglais:Release). R peut prendre les 
valeurs O à 15. 

Exemple: Si R = О 1e volume chute instantanément à zéro (ex. 
flute, orgue...). бі К = 9 il faudra 5/4 de seconde pour que 
le volume tombe à zéro (ex. violon) 


La somme des deux paramètres S + R doit étre placée à l'a- 
dresse 54278 (Voix 1). 
Note: L'octet qui contient l'information S + R est formé de 2 
quartets: un quartet haut pour 6 et un quartet bas pour 
R... (Voir explications pour ñ et D ci-dessus) 
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Voici quelle serait l'enveloppe du SON fourni par une trompette: 
ү ' 


(milliseconde) 


* 
11), ms 
18 ms 
68 ms 


Valeurs 


c 


3 
ә 


XO vi O CI BP 4 F 
>< >< >< >< >< >< >< > X > x > x > >< >< 
= = 
OD Q) NO (I > rq FJ O 


= 
ы 


Hom ر‎ 
лы 


La valeur du Soutien (S) пе dépend pas du temps. 5 
indique à quelle proportion du volume maximal (sommet) la note 
sera SOUTENUE. 


Voici deux enveloppes qui conviennent au VIOLON: 


La note musicale est Soutenue La note mus. est Soutenue 
au 2/3 de son volume maximal au niveau maximal de à 


Voici 4 autres exemples d'enveloppes... 
! 


АДА =! 
) s 
| л Fs bal ose АМ 
R 


XYL.OFHONE ORGUE CYMBALE FIANO 


L'Attaque, le Déclin, 1a Relaxation et la différence entre 
l'amplitude maximale (sommet) et le niveau de Soutien sont des 
facteurs importants pour différencier le SON d'un instrument du 
SON d'un autre instrument. 

Cette étude de la 1ёге qualité du SON (intensité) te 
permet de mieux comprendre les lignes 10 et 20 de l'exercice 
4i. Passe à la 2iéme qualité du SON: la hauteur. 


[BZ La HAUTEUR d'un SON | 


Farler de 1а hauteur d'un SON c'est parler de Ба 
fréquence. La hauteur est cette qualité qui nous permet de 
distinguer un SON aigu d'un SON grave...Et ce qui distinque un 
SON grave d'un SON aigu c'est Ба fréquence, c'est-à-dire le 
nombre de vibrations à la seconde (ou hertz) 


SON GRAVE Si tu as 220 cycles par 
L-3 seconde (ou hertz) tu en- 
tends la note musicale LA-3 
(tableau page 111). 
--- Leyele 
SON  AIGU $ Four le même temps tu as 
Ід-4 5 2 fois plus de cycles/s 


a 2 220 = 440 hertz; donc 
la note musicale est 
un octave plus haut 


22: E 

11 ne faut pas confondre l'intensité (ou volume) d'un SON 
et la hauteur (ou fréquence) de ce SON, Le A-3 et le ІА-4 ont 
la méme intensité (ou volume ou amplitude). Far contre le LA-4 
est 2 fois plus haut (440 Hz) que le IA-Z (220 Hz). 


Je te signale que les étres humains peuvent percevoir des 
SONS allant de 16 à 16000 vibrations par seconde. Ces limites 
varient d'un individu à l'autre...Un musicien peut entendre des 
fréquences plus basses et plus hautes que le commun des 
mortels! Les compositions musicales ont généralement des 
fréquences supérieures à 27 Hz et inférieures à 4700 Hz. 
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Les 8 octaves de ton COMMODORE 64 


Tu connais déjà les 8 sons de la gamme majeure: 

Do, Ré, Mi, Fa, Sol, La, Si, DO. La ізге note s'appelle 
la tonique. La dernière note (DO) est l'octave aigue de la 
premiere, c'est-à-dire que sa fréquence est 2 fois plus grande 
que là premiere. 


La gamme tempérée divise l'octave en 12 demi-tons égaux: 
Do, Dos, Ке, Кей, Mi, Fa, Fat, Sol, Sol#, La, Lats, бі. 

13. 
Chaque demi-ton vaut ү ou EI (1/12) c'est-à-dire: 
1,05946. 
Expérience: Regarde le tableau des fréquences page 112 et tu 
auras le La-4 avec sa fréquence 440 Hz (Hertz) . C'est la 
note-type qui fait l'uniformité entre la plupart des 
pays...C'est le La du violon (440 Hz). 


Four obtenir la fréquence du La#-4 (# pour dièse) qui est 
un demi-ton plus haut, tu multiplies 440 par 1,05946 ou bien 
440 X 2 4 (1/12). (Sur l'ordinateur tu dois mettre un point 
pour séparer les entiers des décimales: 1.05946) Fais ce 
calcul. La note La#-4 correspond à la note 514 -4. Le signe £ 
pour bémol, abaisse la note d'un demi-ton. 


Ton C64 peut t'offrir В octaves et comme chaque octave est 
divisée еп 12 demi-tons, c'est une échelle de 96 notes 
(8X12=96) que tu peux obtenir. En pratique, tu t'arreétes à 95 
(O à 94) comme dans l'exercice 45 ci-dessous. 


EXERCICE 45 Ce programme fera défiler 6 colonnes de nombres sur 
l'écran: 1-1еѕ Nos des notes (0à94) 2-les Notes-*octaves 
5- les hautes fréquences(HF) 4-les basses fréq. (BF) 

5- les fréq. en décimal (FD) 6-1es fréq. en hertz (Hz). 

Tu devras aussi obtenir un SON pour chacun des 12 demi- 


tons des 8 octaves (95 SONS). Tourne le bouton volume TV 


5 REMMLES 8 OCTAYES DE LR GAMME TEMPEREE DES MUSICIEHSAPRR L, PICARD 


18 
15 
20 
28 
26 
27 
38 
35 
36 
4g 
38 
5@ 
rA 
ag 
as 
38 
91 


35 


Saate: Не)Ш.434: REM Ax15,091 POUR GAMME TEMP, DES PHYSICIENS 
ЕСКЕ 8%24,15 

POKE 8-5,8: РОКЕ 9+6. 

PRIMT"ZMOS" TRBCOS"NOÜTES*T" ТЕВ5139"НЕ" TABCISOUEF" ТИБЕЯФАЗ "FI"; 
PRINT TRBCSIS"HERTZ" : PRINT TRBE£SO"OCTRVES": PRINT 

OÜ $=!" 

FOR Leg TO 94 

READ H$ 

IF Маже" THEM OCe0C-1: RESTORE: OCSfsSTRSCUCO: READ HE: РЕІНТ 

FOKE 8%4,17 

Ame TRIPLE: FIMIMTCRAÁA, 0596955 

HE IT CD än" ` BFmFD-CHFWzS62 

ЕСКЕ Z-1.HF: POKE 5, ВЕ 

FOR Tel TQ 388: HEMT 

РОКЕ S+4, 16 

PRIHT I TRBECGOME 00% TREBCI22HF TREXiTIBE ТИВ«ӘЗЭРШ; 

PRIHMT TREC3U»IMTCRIOOH,R025»^100 

МЕЯТСІ 


190 DATA DCO,"DO&",.RE,"RES",.MI.FR,"FRA&",SOL, "SOLS" LR. "LAR", SI, £$" 
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HOS 


юе — Wi 0) AO P Gr RP — 


NOTES+OCTAVES 


DO-A 
lal 
КЕ-й 
БЕй-0 
МІ-й 
ЕВ-@ 
ЕВ#-@ 
SOL —8 
SOL de e 
LA-A 
А-а 
91-0 


TiCI- 1 
DOR 1, 
RE-1 
КЕй-1 
МІ-1 
ЕНЕ, 
el, wi 
SQL 1 
SOL He 1 
LA 1 
ША 1, 
SI-1 


no-z 
DOs-2 
RE-2 
БЕФ-2 
МІ-г 
FR-z 
FRi-z 
SOL-2 
SOL 8-2 
LR-2 
LR 2 


51-2 


DO-3 
Tice 
RE- 
REM 
МІЗ 
ЕН-З 
FR#—3 
SOL -3 
SOL с 
9-3 
LR#—3 
SI-3 


ps Fréquence 


БЕ 
RI 


әш ч ОО ад ьЬ SS ORG GGOFPR R RARE PQ = вә — = og ка ка ка ка һа кА 
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BF 


е fréquence 


KE 


ES en décimal 


ЕШ 


274 
290 
307 
126 
345 
366 
387 
411 
435 
461 
408 
917 


548 
581 
615 
652 
691 
732 
775 
822 
Вт 
922 
97? 
1035 


1857 
1162 
1231 
1304 
1362 
1454 
1551 
1644 
1741 
1845 
1955 
2071 


2194 
2329 
2463 
2609 
2763 
2929 
3183 
3286 
3483 
3691 
39180 
4143 


HZ €—Fréq, en 
hertz 


16,35 
17.32 
18.99 
19,44 
20.6 
21,82 
23,12 
24,49 
SD, 99 
ET. 
29.13 
38,86 


Sa. 
34,84 
36.7 
38,83 
41.2 
43.6 
46,24 
48,93 
51.91 
D 

56, ё? 
61.73 


62.4 
69,29 
73.41 
Tra CR 
82,4 
EI 
92.49 
97.99 
1803,82 
118 
116,54 
123.47 


130.81 
138.59 
146,83 
1525.96 
164,81 
174.61 
184,99 
195,95 
207.68 
220 

233.08 
246.94 


NOTES * CCTAVES HF BF FD HZ 


П0-4 17 37 4389 261,62 
П0%-4 18 KE 4640 SC, 18 
RE-4 19 62 4926 293.66 
REW-4 ea 33 a 13 311.12 
MI-4 21 1954 ББ 329,63 
FF 22 ге? 329 349,23 
ЕА 4 24 Єз 6207 369,99 
SOL. -4 SP 176 SSTG 391,99 
SOL f-4 ar i) 6967 415.3 
LR-4 28 214 - 7362 440) 
Lite 38 1412 7920 466,16 
SI-4 32 94 8286 493,89 
DOS 34 T4 9778 ed. 29 
DA- a5 84 3380 шм, 37 
RES за 125 3823 мат, 33 
БЕй-Ш 47 199 10439 бга. 29 
MI-S 43 ша 118568 ела, 26 
FAS 45 198 11718 698,46 
FAR 49 126 12414 7339,95 
501-9 51 37 13153 763.99 
SOL t7 54 111 13935 930.61 
LA De 172 14764 Bag 

L.FIN 5 61 25 15641 932. 33 
SI-3 64 188 16972 987.77 
Т6, 68 149 17557 1846,71 
шары Tg 168 18681 1198,74 
МЕ TÉ Ed 19707 1174.6? 
FER 81 143 20979 1244,51 
МІ-б6 86 192 22121 1318.52 
ЕН-б 91 148 23436 1396.92 
FER 36 233 24829 1479.99 
SDL - 192 194 26326 1967, 23 
SOL HG 198 222 er ave 1661.23 
L.FI-6 115 88 29528 1760,81 
FRE 122 Di 31283 1864,67 
SI-6 129 120 33144 1975.99 
BEST 137 42 35114 2493, 22 
DON 145 ER 37202 2217.48 
ЕЕ-? 153 247 39415 2349.34 
FER € 163 3A 41758 2489, 03 
"1-7 172 zig 44242 2637, 04 
Ен-? 183 24 a Ba 2793.99 
FRi-T 193 251 43655 2559,98 
SOL - 7 295 132 52612 3135.99 
SOL 8-2 217 189 er 1 3322.46 
Fir eB 176 59056 AE. 
ШАН? 244 183 ERG 3729.34 


Tu peux remarquer, dans la colonne des hertz, que la note 
musicale "LA" donne un nombre entier précis à chaque octave et 
ce nombre double d'une octave à l'autre:...55, 110, 220, 440... 
C'est parce que ce programme te donne 1а gamme tempérée des 
musiciens, basée sur le "LA" du violon: 440 Hz. 


NOTE: Tu remarques aussi que les valeurs obtenues pour la EF 


peuvent varier de + ou. j+ avec -celles--:de. ton. "user's 
Guide"(p.152). Ме t'en fais pas avec ce "і" et prends les 
valeurs que te donne le programme ci-dessus car le tableau du 
"User's Guide"(p.152) a aussi la précision de + ou ~ 1. 


бі tu veux obtenir la gamme tempérée des physiciens (p.384 
dans "Reference Guide"), mets A=15.091 à la ligne 10 du 
programme 


Voici une précision importante concernant la haute 
frèquence (HF) et la basse fréq. (BF): 
Avec un ОСТЕТ (huit bits) tu peux obtenir 256 valeurs 


différentes comprises entre O et 255. Si tous les bits son à 1 
tu obtiens 255. 


Or la valeur décimale des notes des В octaves peut prendre 
des valeurs comprises entre О et 65535. Pour obtenir ces 
valeurs il nous faudrait 16 bits...Ces 16 bits tu les  obtiens 
si tu jumelles 2 octets (total: 16 bits). L'octet de gauche 
s'appelera l'octet haut et 1 ‘octet de droite portera le nom 
d'octet bas. Donc il faudra 2 registres (mémoires) pour 


inscrire la valeur décimale des notes. 
' 


octet haut 2 octet bas 
EXEMPLE, Laz loo o TG DTT TO TOTO ITO 
Y p TREND Y A 
16+8 +4 = 28 128464 +16 +} +2 -21h 


Regarde le La-4 de ton tableau(p.112) et tu verras: 
HF - 28 et BF - 214 
Donc la valeur de l'octet haut donne la HF et la valeur de 
l'octet bas donne la БЕ. 


Mais attention! Four avoir la valeur décimale de 1 ‘octet 
haut, 11 faut le multiplier par 256. La valeur de l'octet bas 
correspond déjà а Sa valeur décimale. Donc les valeurs 
inscrites dans la colonne FD(fréquence en décimal) s'obtiennent 
ainsi: 

Exemple, le La-4: 28(HF) multiplié par 256 + 214(BF) = 7382. 


Conclusion: Cette étude de la fréquence (ou hauteur du son) te 
permet de mieux comprendre la ligne 40 de l'exercice 41 ой 2 
registres apparaissent pour indiquer la fréq.: Four la voix 1, 
tu mets la valeur de la haute fréq. (HF) dans le registre 54272 
et la valeur de la basse frég.(BF) dans le registre 54272. 
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Tu fermes les yeux et tu écoutes 1а même note musicale 
(méme fréq.) jouée à l'orgue, au piano puis au 
violon. Fourquoi peux-tu identifier l'instrument qui joue cette 
méme note? 

C'est parce que le méme SON, produit par des instruments 
différents a un TIMBRE différent...Et le timbre d'une note 
musicale dépend de ses HARMONIGUES...Et l'ensemble des 
harmoniques déterminent la FORME de 1 ‘ONDE. 


Inversement, si tu changes la FORME de 1'O0NDE, tu fais 
varier le TIMBRE(ou le nombre d'harmoniques). Nous verrons 
ci-dessous que ton C64 t'offre le choix entre 4 FORMES d'ONDES. 

Il est intéressant de noter aussi qu'un SON sans 
harmonique, comme celui du diapason, есі moins agréable A 
entendre qu'un SON possédant toutes les harmoniques comme celui 
fourni par un violon. 


Volume 

Fréquence fondamentale 

(ou liére harmonique) А 

тааси harmonique ( 74/۸2 ° 
Troisième harmenique (iM PAi&) 


25 


«—la fréquence résultante 


On appelle harmonique d'un SON, un autre son dont la 
fréquence est un multiple entier de la fréquence du premier. 


Ton C64 peut produire 4 FORMES d'ONDES: 


1- Les ondes triangulaires: 
--elles possèdent seulement 
les harmoniques impairs 
--exemples: orgue, flute... ST 
7-On les obtient en mettant 17 
dans le registre 54276(Voix 1). 


2- Les ondes à dents de scie: 
--elles possèdent toutes les 
harmoniques (pairs et impairs) 2 
--exemples: violon, trompette... 
--0n les obtient en mettant 23 
dans le registre 54276(Voix 1). 


z= Les ondes rectangulaires ou impulsions: 
--elles possèdent seulement 
les harmoniques impairs 
--exemple: piano... 
~~on les obtient en mettant 65 | n 


dans le registre 54276 (Voix 1) k š 
ГИРЕР 


l'impulsion 


Ici il faut apporter une précision importante: Les 
impulsions (ou ondes rectang.) ont une largeur et si tu fais 
varier cette largeur, tu changes le timbre de 1а note musicale. 


La largeur peut varier de О А 4098; à ces 2 extrêmes 
l'impulsion devient une ligne droite (tension continue). 


Dans le cas des impulsions comme dans celui des fréquences, 11 
faudra loger l'imformation dans 2 registres puisque la plus 
grande valeur dépasse 255! Tu auras un quartet(4 bits) pour la 
haute impulsion(HP) et un octet pour 1a basse impulsion(BP). Le 
maximum sera: quartet 15Х256 % l'octet 255 - 4095, 


NOTE: la valeur médiane (2048) pour la largeur de 
l'impulsion est l'idéal pour le timbre du piano 
parce que 2048 donne une onde carrée: largeur-chauteur. 


Le quartet haut ira L'octet bas ira dans 
dans dat 542785 e 54274 
I 


Exemple, piano: 8 et O 

En résumé, pour avoir une onde rectangulaire il faut: a) 
mettre 65 dans le registre 54276 et b) ajouter 2 instructions 
pour préciser la haute impulsion(HP) et la basse impulsion(BP). 
Tu écriras: РОКЕ 54275,8: РОКЕ 54274,0 (pour le piano, voix 
1). 


Voici 2 remarques importantes avant de faire l'exercice 46: 

а) Dans un programme, l'instruction donnant la FORME de 1 ‘ONDE 
doit toujours étre placée après les instructions précisant 
l'enveloppe de 1 onde. 

b) Lorsque le bit zéro du régistre 54276 est mis а zéro(OFF), 
c'est-à-dire quand 17 devient 16 ou 33 devient 32 ou 65 devient 
64 ou 129 devient 128, ALORS l'enveloppe n'est plus activée et 
la phase de relaxation commence. 


EXERCICE 46 Fais le chargement (LOAD) de l'exercice 4i-B. А la 
ligne 20, mets 9 et O dans les registres 5+5 et 6-6. 

А la ligne 50, mets 65 au lieu de 17 pour avoir une 
impulsion et à la ligne 70, remplace 16 par 64. Quand 
tu as une impulsion, il faut 2 instructructions supplé- 
mentaires: ajoute une ligne No 25 et mets 8 pour la 
haute impulsion(HF) et О pour la basse impulsion (ЕР); 
tu auras 8X256-2048 (onde carrée pour piano): 


Solution au verso: 
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" Sand? Pest REM FT AH 
Й F 
ей 
lp 
20 
EI 
bd Dr 
5 
7B 
mo QOTO m 

Sag! DATA 21.31.912.295.30,384.25.30.128,29.30,212 
Dip DATA SG, 48,618, BL. LES. ARA RL 168, 188,91, 168, PER 
mA DATA 290 20, ANE 20, 43,256. 31. 165. ASB. 33, 148, 12 
maed DATA EA. 181,518, 20, 49, 912. 2%, 30,512 

mad DATA -1,—1,-1 


THEN END 


: HEWT 
FOR Tei TU 20:МЕХТ 


4- Le BRUIT (ou les ONDES discordantes): 


La 4iéme FORME d'onde est celle du BRUIT. Si tu mets 1а 
valeur 129 dans le registre 54276, le C64 fournira un mélange 
d'ondes choisies au hasard et comme ces ondes ont des 
fréquences qui ne sont pas des multiples entiers... (pas 
d'harmoniques), il en résulte des effets discordants (BRUITS). 


Exemples: tonnerre, p. 59 
moteurs (fusée) ,p.65 
le vent, les pas... 


CONCLUSION: Le TIMERE du SON rendait nécessaire une étude sur 
les différentes FORMES d'ondes de ton synthétiseur de musique 
car la forme de l'onde permet de changer le timbre d'un son. 
Voici un exercice qui résume les notions  apprises sur la 
programmation de la musique... 


EXERCICE 47 Ce programme permet d'entendre 1а chanson populaire 
"A LA CLAIRE FONTAINE" jouée sur différents instru- 
ments de ton choix: 


LE PRIMT"ZM'"SPCZIi2»"RH LA CLAIRE FONTAINE" 
15 PRINT! | PIRHÜ 

i? PRINT" W VIOL OM 

19 PRIHT" GER Ш TROMPETTE 

21 PRINT" ga, & FLITE 

23 PRINT" EE, MN ORGUE 

ес PRIMTUS ae, M Vd OH 

ӘР PRINT" goe, RB SYHTHETI 

ӘЗ РЕТМТ ТАРЕ Uu SCMIF ЕТ RETI 
"E THF ШЕ жетон CHOIX";CH 

40 ER Se Fes TO SFE: POKE М.й: MEST 


rare 118,124 
5 Bsp: Нйеб4: GOTO 130: REM PIANI 
: paag: GüTO 136: REM VIODLOM 
Е GOTO 130: REM TROMPETTE 

GOTO 130: REM FLUTE 

GüTO 138: REM ORGUE 

GATI 138: REM КЕНЧЕ 
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] LÉ 
ee Büeiü: 


SE Fest peas: GOTI 130: REM UNIQUE RU SY"THTHETISEU 
REAT НЕ, E. nu 
IF НЕ] THEM RESTORE: 
Sem.m: PORE Sti 
43, HP: POKE SHE, ВЕ 
(| +4, EO 
FOKE S-1.HF: 
FOR Tel TO DU: 
РОКЕ 9+4, Bü: FOR Tel TO 48: MEWT 
ӨШТІ 
DATA 


GATA 18 


DATA d GE 
ATA z.94.296.28.,2149,296.28.177.51z 
DATA 25.177, 256,32, Sid. 2816, 32, 54,256, 28.214.256 
DATA 32,94,768.39.94,912.32,.9d,.296,28, 214, zu 
DATA 25.177. c E. 94,25 38. 126,256,3 as 34, 286 
GER : SuE5.dz.54,2256.28.177.2255 
DATA Zä. 170 212, 209. TT: 
ТАТА £ 2,94,2 28,214, a 1095 
DATA ROPA Sani 25 177,28 AE HA. ALA. AE. A, ADE 

DATA ZBG,.zi4.128.25.177.128,32.94,256.28.214,256.25,177.768 
ТАТЕ 1.-1 


A 


Es 


L'instructions ОМ (ligne50) sera étudiée au chapitre 4. 

Je te conseille d'acheter le recueil des "Cent plus belles 
chansons" et d'en faire jouer par ton Có4...Ce recueil contient 
les chansons les plus populaires de notre folklore québécois. 
Les 2 exemples précédents sont dans ce recueil: MON BEAU SAPIN 
et À LA CLAIRE FONTAINE...tu pourras comparer... 


Dans le projet "QUEBEC CHANTE”, ton C64 jouera la chanson 
de Gilles Vigneault: "Gens du pays..." 
EXERCICE 48-A Ecris ce programme qui fera entendre 5 fois les 
notes La-4 et Do-5 avec un délai de 1/3 seconde 
entre chaque note. 


5 башат 

14 FOR Lal TO 5 

20 РОКЕ 5+24,19 

38 POKE 5+9,0: POKE 5+6, dag 
35 POKE 544,17 

4@ PIKE $41.28: FOKE 8,214 
45 FOR Те) ТО 3060: NENT 

sø POKE ©+1,34: POKE 5,74 
60 FOR Tai TO 300: HEMT 

op POKE 8%4,16 

Әй МЕЯТ I: POKE 641,0: РПКЕ S, 


EXERCICE 48-В Four créer un effet de rapprochement tu fais 
augmenter graduellement le volume. Transforme 
ainsi les lignes 10 et 20: 


10 FOR 1=1 TO 15 ӨТЕР 1.5 
20 FOKE 5+24,1 


EXERCICE 49 Four créer un effet d'éloignement il faut dimi 
nuer graduellement le volume. Complète ton programme 
pour obtenir successivement les 2 effets: 


ЕЕЕ ЕР ДРА 

14 FOR I-1 TO 19 STEP 1.5: QOTO 20 
15 FOR [els ТО Ө STEP -1.5 

Әй POKE Std. 1 

38 POKE S.A: РОКЕ S46,240 

2959 POKE 84,17 

4й POKE Z-1,28: РОКЕ 5,214 

45 FOR Tei ТО 3d: MEAT 

50 POKE 841,34: РОКЕ 5,74 

өй FÜR Т=1 TO 38: MENT 

CH POKE 544,16 

ТЕСІЕ Таб THEM EMI 

80 HEMT I: POKE 8%1,0: РОКЕ 5,0 
90 GOTO 15 


EXERCICE 50 Ce programme fait rebondir une balle retenue par un 
élastique. Un son électronique est produit lorsque 
la balle touche le sol et un autre de fréquence 
supérieure quand la balle touche 1а palette. 


Listing du programme Dessin sur l'écran 


ч FRIHT' MMMM": POKE $3281,8 
18 Sedara: РОКЕ S424.15: PUKE 895,8: POKE S+6,Q 


20 PRIMT" Hs 

21 PRINT" "o. Ж 
22 PRINT" e | 

2З PRINT" NI Mrs 
Z4 PRIMT" mil 

£5 PRINT" Е 

26 PRINT" i 


4@ FOR Та) TO 18 

ӨЗ мај Эша: Led: Bei: ЕшӘҘ 

50 POKE mR: FÜR Tel TO SQ: HEMT 

мы FOR Іші TO 3 

Єй Zesz-4ü 

65 РОКЕ W-Z.B: POKE x-Z-40.E: FOR Tel TO 50: НЕХТ 
T@ IF Таз THEM POKE 5+1,259: POKE 5,177: POKE S+4,17 
71 POKE 5%1,0: POKE 6,9: РОКЕ Sid, Lë 

T$ IF Cl THEM ЕМІ 

DH HEMT I: далей 

S5 POKE x-48,98: FOR Tel TO 18: HEMT: POKE -48,111 
Эй FOR Іші TO 3 

Эш Zmz-4u 

100 ЕСКЕ M4Z,32: PUKEx*Z-40.81: FOR Tel TO pp MEWT 
182 IF [=з THEM POKE Z*1,.51: РОКЕ 8,97: POKE 844,17 
106 PAKE S-1,0: POKE S.0: POKE 244,16 

119 HEMT I 

115 POKE Hq, 90: FÜR Teil TO 18: NENT: POKEX-40.111 
128 HEMT J 

125 б=1: СОТО 
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Québec chante 


Frends Жа cassette sur laquelle tu conserves les 
programmes déjà étudiés et fais le chargement (LOAD) du projet 
0-1 (page #0) dans ton С64. Après RUN et RETURN la silhouette 
du Québec apparaîtra sur l'écran. 


l- Ecris LIST et introduis, à droite de 1а silhouette du 
Québec, la phrase 
suivante: Mon cher 
Guébec 
C'est à 
Ton tour 
Ез Remplace la boucle infinie de la ligne 1250 par une boucle 
d'attente (ou de délai) de 1 1/2 secondes. 


3- Procure-toi une copie du chant populaire de Gilles Vigneault 
"Gens du Fays"...Tu constates qu'il y a seulement 6 notes 
différentes: ҒА, SOL, LA, АЖ, DO, RE. 


4- Utilise la VOIX 1 (registres 52272 à 55278: p.122) du C44 et 
place la valeur des notes musicales dans des instructions 
БАТА (voir tableau des notes page 111-4112). Mets le 
volume principal à 15. 


Ecris la basse et la haute fréquence des notes selon l'ordre 
du chant sans oublier d'inclure les 

temps de délai (Durée) 

dans les instructions DATA. 


uU 
i 


6- Utilise une boucle FOR...NEXT pour lire(READ) trois données 
à chaque itération: HF,BF, et DU (temps de délai. 


7- Il serait bon d'inclure une instruction GET pour permettre à 
l'utilisateur de réentendre le chant simplement en appuyant 
sur une touche. Dans ce cas, l'instruction RESTORE devien- 
dra nécessaire pour ramener le роіп- 
teur au début du 
premier DATA (donnée). 


8- Tu utiliseras la variable 6 pour identifier le premier 


registre du SON (Voix 1:825:272) 


Une solution de се projet D-2 est proposée а 1а page 
suivante. 


PROGRAMME D-2: Québec chante 


990 PRINTI" 

Logg PRIMT 

ійій РВІНТ" uU" 
lash PRINT" їй E ' 
1020 PRINT” чӣ w 
1048 PRINT" DÉI KI ~ MON CHER” 
1090 PRINT" ІҢ Bam k QUEBEC” 
1060 PRINT" "i my C'EST" 
1874 PRIMT" ІШ БЫ A тон" 
18880 PRINT" 4 "Ea TOUR" 
1090 PRINT" а" "RU 

11808 PRINT" D "ы" 

1118 PRIHT" Іш ы" 

1128 PRIHT" ІЙ a" 

1138 PRIHT" ail WT 

1148 PRIHT" 1 wr 

11%@ PRIHT" 19 И" 

1180 PRIMT" D ИШЕ? s 

1474 PRIHT" D и 4d ш . 

1188 FRINT" Я swa WT An 

1198 PRIHT" "8 wg Wi 


Ee GE "Se. Zeg ш š Le röle de chacune 
1238 ЕОЕТв1701%00:МЕХТ Wr о сыс 
2010 S=54272 Ss SE 


2020 РОКЕ S*24,195: REM VOLUME МЕХ, 

2029 РОКЕ S«3,0: POKE S-2,259: REM ШОТЕТ HT ET BAS DE L'IMPULSION 
саза РОКЕ 245,9: POKE S-6,9: REM RD ЕТ SR DE LA VOIX 1 

2040 КЕНІ HE, BE, DU 

2050 IF НЕСЯ THEM 21168 

RAGA РОКЕ S*1,HF: POKE S, BE: REM METTRE LA HTE FREG. ET BASSE FREQ, 
2070 РОКЕ «4,65: REM БІТ ZERO A 1 DE L'ONDE RECTRMGULRIRE 

2090 FOR Tel TO ШІ: HEWT 

2090 POKE 544,64: FOR Tel TO S: НЕХТ: REM BIT ZERO A 8 DE L^OMDE RECT. 
2194 GATO 2040 

2118 FRIHMT"TRPE UNE TOUCHE"; 

2120 ЗЕТМ%:ТЕМФж!"ТНЕМ 2120 

2130 RESTORE : GOTOaae 

200 DATA 28,214,256, 25,177, 256, 22, 227,096, 34, 75, 76B 

2318 DATA Z9. 214, 256, 25, 177,086, 22, 227,256, 38, 126, 768 

sen DATA &5,177,256, 90, 141,286, 20, 126,256, 34,753,512 

2 DATA 34,72,256,24,75,512,28,126,256,24,7%,512 

cuc МЕМ жин 

23540 DATA 28.214.256,22.17T7,256.22.227.256,34,.75,768 

2990 DATA 298.214.256.25.17T7.256.22.227.256.38.126,768 

256 DATA 25.17T7.256.380.141.256.38,.126,2556,34.75,512 

ZATO DATA 22.227.296.28.214.9512.28.177.2596.22.227.768,-1.-1.-1 


R ha e ignes du pr ES 
990 à 1220: 8i tu veux des précisions sur ces lignes, relis la 
page 30. 

Identification de la variable 8 (S=ler registre du SID), 
Volume principal à maximum (15). 
Les 2 registres de la haute et la basse impulsion qu'il 
faut employer avec l'onde rectangulaire. 

20; L'enveloppe: 9 pour Attaque+Déclin et 9 pour 
Soutient*Relaxation. 

2040: Lecture des Z premières valeurs dans DATA de la ligne 
2800: HF pour la haute frégence, BF pour la basse fréq. et DU 
pour le délai 

2050: Offrir le choix de recommencer quand le (64 rencontre -і 
dans “БАТА”. 

2060: А la première itération la haute fréq. (HF) vaut 28, 1а 
basse fréq. (ВЕ) vaut 214 et la durée(DU) 256 ms (ou 1/4 
seconde) 

2070: Avec 65 dans le registre 52279 tu as une onde 
rectangulaire et tu actives le registre de l'enveloppe „(bit 
zéro à 1). 

2080: Boucle d'attente... 

2090: Avec la valeur 64 l'activation de l'enveloppe cesse (bit 
zéro à о). 
Recommencer la boucle pour lire(READ) Z autres données... 
Attente d'un caractére quelconque. 

L'instruction RESTORE ramène le pointeur des données 
(DATA) au début (en 2500)...pour permettre de relire les 
valeurs: HF,EF et DU. 


Note HE BF Mot Durée 
LA 28 214 Mon 256 
SOL. 25 277 cher 256 
FA 22 22 Gué- 256 
DO 54 75 bec 768 
LA 28 214 c'est 256 
SOL 25 iw à 256 
FA 22 227 ton 256 
RE * 126 tour 768 
SOL 25 177 се 256 
LAH зо 141 Le 256 
RE 3 126 lais- 256 
DO 54 Z ser 512 
ро 54 75 рағ- 256 
DO 54 yi] ler SI2 
RE 38 126 d'a- 256 
DO 54 75 mour 512 
Le chant reprend...et se termine ainsi: 
FA Se 227 рағ- 256 
LA 26 214 ler 512 
SOL. 25 Z7 d'a- 256 
FA 22 227 mour 768 
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Les 29 registres (mémoires) du synthétiseur de son/musidque 
sont situés aux adresses 54272 à 54500. Le symbole S sera La 
variable servant à représenter la première adresse: 5-754272. 


Rôle du registre 


Hasse fréquence (EF) 
Haute fréquence (HF) 
Basse impul si on (EF) ONDES 
Haute impulsion(HP) RECT. 
Forme de l'onde (ҒО) 
Attaque/Déclin (AD) 


i7ouX3ouéSoul29 
fA-O à 15 foislé 
ІЗ 


а 
à 15 foislé 
à 


S+é ou 54278 > | Soutien/Relaxat. (SE) 


S+7 ou 54279 
jusqu'à Comme pour 1а Voix 1 
S413 ou 54285 


S*14 ou 54286 
jusqu'à Comme pour 1а Voix 1 
S+20 ou 54292 


Les adresses S-21, S422, et 8-23 sont les registres des 
FILTRES. C'est une partie importante de ton  synthétiseur qui 
sera expérimentée dans le VOLUME 2 de cette série. Les filtres 
peuvent changer le timbre comme peut le faire "la forme de 
l'onde" et encore davantage! 

8424 ou 54296 est l'adresse du volume principal pour les 3 VOIX 
S+25 à 8429 sont des registres (en lecture seul.) que tu 
expérimenteras également dans le volume 2. 


Tu peux programmer une pièce musicale ayant plusieurs 
parties...Mais pour synchroniser l'ensemble il est bon d'utiliser 
les tableaux à 2 dimensions (voir сһар.5). C'est principalement 
pour cette raison que les programmes des chansons en plusieurs 
parties se retrouvent dans le deuxième volume! Ти  comprendras 
aussi l'avantage d'utiliser la forme décimale (FD) dans les 
"DATA" au lieu de 2 valeurs: HF et BF. 


Conclusion: Je te conseille de conserver dans un tableau Les 
meilleures combinaisons: AD SR et FORME de 1°ОМЕ que tu 
auras découvertes dans tes expériences musicales...EXEMPLE: 
Forme de l'onde: 
17o0u33ouó650u129 
Si FO - 65 alors 
préciser HP et BP 


Orgue 


Violon 


Fiano 


CHAPITRE IV 


ACTIVITES DIRIGEES Série No 4 


[Bur | Cette quatrième série d'activités a pour but de te 
familiariser avec: 


i- Les В instructions: INPUT, GOSUR et RETURN, STOF, END, 
DIM, ON et LET. 


2- Les boucles imbriquées. 

3—- La notion d'algorithme. 

4- Les six fonctions: БОК, INT, STRE, VAL, RND. 
3- Les opérateurs arithmétiques. 


6- Les tableaux à une dimension (ou listes). Les 
variables indicées. 


7- Un "didacticiel". 


Яғ 
< 


Entre ton 
Sauve ton 


programme sur cassette ou sur disque car tu en auras besoin au 


chapitre IV. 

Le circuit doit contenir: 

1- Un accumulateur de 12 volts. 
2—- Un interrupteur. 

3- Un fusible de 5 ampères. 

4- Un volmètre 

5- Un amperemetre. 


6- Un rhéostat (résistance variable). 


LISTING du PROGRAMME Е-і: 


501 PRINT"BFUSIBLE(U ассо" 

502 PRINT" sig MULATEUR " 
593 PRINT" шаш Г | + -" 
504 PRINT" ff <a ila p 
505 PRINT"| ma 12 І 
595 PRINT"I m I 
507 PRINT"I mm VOLTS [J$ 
598 PRINT"I um WE "аз 
509 PRINT'I "B$ 

510 PRINT"I "A$ 

511 PRINT"| AMPEREMETRE "BẸ 

512 РВІМТ"І VOLTMETRE "A$ 

513 PRINTI ES ESCH "В% 

514 PRINT"| ш o ni Ішд 271 "AS 
515 PRINT'I І l Іні "R$ 

515 PRINT"I LONE 1 чан ш "Кж 
517 PRINT'I mi ш! m "GL" 
кіз PRINT Am] w gas" 
519 PRINT" І | кн" 
S29 PRINT" ERHEOSTAT H Kaes a" 


s25 GOTO 525 


Voici un exemple de ce 
que tu pourrais obtenir 
sur l'écran après 

“КОМ et RETURN’. 


Karen І DEEN, 1 
= > p 


VüLTMETRE 
(a "| 
I Жез 
RH 


AMPEREMETRE 


RHEOSTHRT 


L'instruction INFUT (entrer) permet d'entrer, par Le 


clavier, des données numériques ou des données chaînes de 


caractères dans la mémoire de l'ordinateur pendant l'exécution 


d'un programme. 


INFUT est donc une instruction d'entrée de données en mode 
conversationnel. 


PREMIER EXEMPLE: Tu veux un programme qui calcule: 


1- la circonférence C d'un cercle. Formule: C = 27r 
2- la surface S de ce cercle. Formule: 5 = rè 
L'ordinateur attendra une seule donnée numérique: le 


rayon r du cercle. 


EXERCICE 1 Ecris une première version d'un programme qui 
calcule la circonférence et la surface d'un cercle. 


10 INPUT R 
20 C=exaxR 
30 S=axRte 
40 PRINT C,S 


L'instruction INFUT (ligne 10) interrompt l'exécution du 
programme et fait  apparaftre un point d'interrogation sur 
l'écran pour indiquer que l'ordinateur attend une donnée: le 
rayon R d'un cercle. 


Admettons que tu tapes 15 et que tu appuies RETURN. 
Aussitôt le C64 met cette valeur 15 dans la variable К qui 
représente le rayon. 


А la ligne 20 le C64 calcule la valeur de la circonférence 
et met le résultat dans la variable C. 


А la ligne 50 il calcule la surface et met le résultat 
dans la variable S. 


Ces calculs se font sans difficulté parce que le Có4 а 
"toujours en mémoire" la valeur de 7 (2,14159...). 


* symbole de la multiplication 
symbole de l'élévation à la puissance (ou exponentiation) 


NOTE TIRA 2 est équivalent à TARAR 


A la ligne 40 le C64 affiche les deux résultats sur 
l'écran, c'est-à-dire le contenu des variables С et S. 


Cette première version du programme fonctionne très bien 
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mais il serait bon de lui apporter les 4 améliorations 
suivantes: 


1- C'est toi qui es l'auteur de ce programme et tu sais ce que 
l'ordinateur attend quand il affiche un РТА Il faudrait 
ajouter une information pour qu'un autre utilisateur puisse 
connaître la question que l'ordinateur lui pose. Cette 
information peut étre écrite entre guillements après INFUT. Tu 


ajoutes ensuite [s] et іа variable К. Ce BJ placé entre 


EXERCICE 2 Remplace l'instruction 10 par: 
10 INFUT"RAYON DU CERCLE"; К 

Ecris RUN et tape RETURN. L'écran affiche: 
RAYON du CERCLE? 


2— Deux résultats seront affichés sur l'écran: celui de 1a 
circonférence et celui de la surface. 


La aussi une information est nécessaire pour que 
l'utilisateur différencie les 2 résultats: celui de la 
circonférence et celui de 1а surface. 


EXERCICE 3 Remplace l'instruction 10 par: 
40 FRINT"CIRCONFERENCE ="3C:FRINT'SURFACE ж";6 


5- ІІ reste encore une amélioration à apporter pour que 
l'échange homme-machine se fasse avec plus de rapidité et de 
comfort, 


Four chaque valeur R entrée au clavier tu dois écrire 
RUN... Cette opération peut étre éliminée. 


EXERCICE 4 Utilise l'instruction GOTO pour ajouter une boucle 
infinie dans ton programme. 


50 GOTO 10 


Chaque fois que le (64 rencontre l'instruction 50, il 
retourne à la ligne 10 et redemande un nouveau RAYON. En 
principe, il est interdit d'implanter une boucle infinie dans 
un programme mais ici la boucle contient une instruction INFUT 
qui interrompt le programme. Tu peux alors sortir du programme 
quant tu le désires si tu  appuies simultanément les touches 
STOP et RESTORE. 


4— Avant de sauvegarder ton petit programme sur cassette, il 
serait bon d'améliorer l'affichage sur l'écran еп te servant 
des caractères de COMMANDE d'AFFICHAGE (page 35). 
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ЕХЕКСІСЕ 5 


ris, en mode direct, deux instructions différen- 
tes pour effacer l'écran: 


PRINT" jJ" Qu PRINT CHR#C 147) 


Mets l'une ou l'autre de ces instructions dans une ligne 
no 9 de ton programme. 


EXERCICE 6 Ajoute le caractère No 5 p.35 au début de chacune 
des informations écrites entre guillemets et tu 
obtiendras cette version finale du programme: 


1 REM CALCUL DE LA CIRCONFERENCE ET DE LA SURFACE D'UN CERCLE 
5 PRINT", 

10 INPUT"XRAYON DU CERCLE";R 

20 Cz8x«xR 

30 S=4xRte 

480 PRINT'"MCIRCONFERENCE=";C: PRINT'MSURFACE=":S 

58 GOTO10 


EXERCICE 7 Si tu veux garder seulement 2 décimales, il faut 
utiliser la fonction INT( _)... (voir exercice 19). 
Remplace les lignes 20 et ЖО par: 


20 С= ІМТ 2жежКж100+.5)/190 
39 S=INT «жК?2ж100+.5>/ 100 


DEUXIEME EXEMPLE: 


Un peut entrer plusieurs données dans une même instruction 
INFUT. Voici un exemple où le Có4 attend deux données: 


1- Tu veux un programme qui calcule la surface d'un triangle 
rectangle. 


H 
Formule: Surface = Base X Hauteur کے‎ 


2 B 


L'ordinateur attendra deux données numériques: la base В 
et la hauteur H. 


EXERCICE 8 Ecris une première version d'un programme qui 
calcule 1а surface d'un triangle rectangle: 


10 INPUT Б,Н 
20 S=E*H/2 (Note:le trait oblique est le symbole de la 
ЖО FRINT 8 division), 


Guand il y a plusieurs variables après INFUT, il faut les 
séparer par une virgule. Quand tu entres tes nombres, il faut 
aussi les séparer par une virgule. 


Supposons que tu tapes 27,16 et que tu appuies RETURN. 
Aussitôt le C64 introduit la Valeur 27 dans la Variable B 
(base) et 1а valeur 16 dans la variable H (hauteur). 


А la ligne 20, il fait le calcul et met la réponse dans la 
variable Š (surface) puis à la ligne ЗО, il affiche la réponse 
(1e contenu de S) sur l'écran. 


QUESTION бі j'entre seulement un nombre, par exemple 27, et 
par erreur j'appuie RETURN. Que se passe-t-il? 


Réponse: Cen'est pas gravel... Le C64 prendra cette première 
valeur pour la mettre dans H puis il va te demander le deuxième 
nombre en affichant un double point d'interrogation. 


Si tu tapes Ж valeurs au lieu de 2 le C64 prendra les deux 
premieres et ignorera la troisième. Il  imprimera: EXTRA 
IGNORED. 


EXERCICE 9 Complete ton programme de la surface d'un triangle 
rectangle pour arriver à une version finale qui 
ressemblerait à celle du programme précédent (ex. 6+7) 


NOTE бі tu veux un programme qui calcule la surface d'un 
triangle guelcongue, tu trouveras la réponse à 
l'exercice 18 de ce chapitre. 


TROISIEME EXEMPLE: 


EXERCICE 10 Mets une "variable chafne" après INFUT et entre les 
données "chaînes de caractères" suivantes: 
(voir chafnes de caractères page 44). 


10 INPUT",ZQNECRIS TON PRENOMBRBEBBBI":^s 
20 РКІМТ"ШМИСБЕМЕ GLACEE MOLLE” 

ЗӢ PRINT"NEP-PETIT FORMAT 6,35%" 

40 РКІМТ"ЖМ-МОҮЕМ "CHR$C3A»" 0,50%" 
50 PRINT " HG =GRAND "CHRE 345" 0,75%" 
SA INPUT'MMTON CHOIX? SR М OU Jom": B$ 
70 IF B$-"P" THEN P$="0,35#":GOTO100 

ЗӢ IF B$-"M" THEN P#$="0,50#":GOTO100 

90 РФ= "0,75%" 

100 РКІМТ" СЕ SERA "P$" S.y.p." 

110 PRINT'EMERCI "A$ 


Explications: 


А la ligne 10 le déroulement du programme est interrompu 
et l'ordinateur attend une chaîne de caractères: ton prénom. I1 
n'est pas nécessaire d'écrire to prénom entre guillemets car le 
C64 s'attend à une chafne... 

Quand ton prénom est écrit, tu appuies RETURN et le cé4 
met aussitót ton prénom en mémoire à l'adresse de la "variable 
chaîne" Az. 


Мете chose à la ligne 45 sauf que la "variable chafne" БЖ 
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ne contiendra qu'un caractères soit F ou M ou б. 


es ЗО et 335: Il arrive parfois qu'on utilise Le 
caractere guillemet V sous un mot pour signifier la 
répétition de ce mot. Exemple: 


Fatit format о, ЕФ 


Moyen ш O, SOF 
Gr and 075$ 
Le seul moyen d'introduire le caractère a dans une 


chaîne est l'emploi de la fonction  CHR£(US4)... (voir tableau 
des codes CHRE p. 76). 


La ligne 65 contrôle la réponse donnée à la ligne 60 car 
il est indispensable qu'un des 3 caractères: F ou M ou 6 soit 
tapé au clavier... Sinon redemander l'instruction 60. 


(anglais: Nested Loops) 


Tu as souvent utilisé les boucles simples FOR... NEXT dans 
les exercices précédents. 


Une boucle  imbriquée (ou intérieure) est une boucle 
contenue dans une autre boucle. Dans plusieurs programmes tu 
as placé une boucle d'attente (ou de délai); on peut dire que 


cette boucle d'attente était imbriguée lorsqu'elle était placée 
à l'intérieur d'une autre boucle. Vérifie l'exemple suivant: 


Départ de ta fusée, lignes nos 1590 à 1420, page 65. 


Construis maintenant un petit programme où la boucle 
imbriquée ne sera plus une simple boucle d'attente mais une 
boucle qui contiendra une instruction PRINT: 


EXERCICE 11 Utilise 2 boucles imbriquées pour imprimer alter- 
nativement la devise: "Je me souviens" (en blanc) 
et ЦО étoiles (bleu clair); répéter l'opération 11 fois, 


5 РКІМТ"Ш"; 
10-ҒОК Ісі TO 11 
INT"SJE МЕ SOUVIENS" 


ea 

SE FÜR 1-1 TO 40 
бер INT "Ож"; 

50 BE J 
GOENEXT I 


Il faut noter qu'on peut omettre les variables J et I 
après NEXT. Il est permis également de remplacer les deux 
instructions NEXT des lignes 50 et 60 par une seule ligne 
écrite ainsi: 50 NEXT 4,1. 


ы 
A 


EXERCICE 12 Utilise Z boucles imbriquées pour imprimer d'abord 
traits verticaux (Sur les colennes 6, П D et 

sur la colonne 3 et ensuite 39 traits horizontaux: 
cette opération doit se répéter 1l fois 
(n'oublie pas de compter la colonne О). 

5 PRINTSI 

10«FOR Ісі TO 11 

R Jz6 TO 34 STEP 7? 

NT TABCJÓ"|"; 


La boucle imbriquée FOR J... NEXT J sera parcourue 5 fois 
et J sera d'abord égal à 6 et ensuite à 13..à cause du FAS 
(STEF) 7. NOTE: la colonne 6 correspond à la 7e colonne (о à 
6) et la colonne 1% correspond à la 14е colonne (О à 13). 


La valeur de J sert de paramètre (argument) à la fonction 
ТАВ pour que la TABulation se fasse à l'endroit souhaité sur 1а 
rangée: colonnes 6, 13, 20... 


L'étude des tableaux à 2 dimensions (chap. 5) t'offrira 
une occasion en or de pratiquer ces boucles imbriquées. 


Règles à suivre dans les boucles imbriquées: 


1- La boucle doit avoir une variable de contrôle différente de 
celles des autres boucles dans lesquelles elle est imbriquée 

2—- La boucle intérieure doit étre entièrement contenue dans 1а 
boucle extérieure (pas de chevauchement). 

5- On peut effectuer un saut à partir d'une boucle intérieure 
mais on ne peut pas effectuer un saut de l'extérieur vers 
l'intérieur... Tu ne peux rentrer que par une autre 
instruction FOR... NEXT. 


Il y а 5 opérateurs arithmétidques: 


Addition 
Soustraction 
Multiplication 
Division 
Exponentiation 


signe plus 

signe moins 
astérisque 

trait oblique (slash) 
flèche verticale 


5 * 1 + 


Hiérarchie des opérations: (ou règles de préséance) 


1- Toutes les exponentiations sont exécutées en premier. 
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2- Ensuite les multiplications ou les divisions sont effectuées 
en allant de 1а gauche vers la droite. (тете hiérarchie) 
3- Les additions ou les soustractions sont effectuées aussi 
en allant de la gauche vers la droite. (méme hiérarchie) 
les parenthèses car les parenthèses sont évaluées avec une 
priorité supérieure à toutes les autres opérations. 
D'abord les parentheses les plus à l'intérieur... etc. 


EXERCICE 15 Transformation des degrés Fahrenheit F en degrés 
Celcius C. Formule:  C-(F-22)*53/9. On a introduit les 
parenthèses pour donner la priorité à la soustrac.:F-32 


5 PRINT" 

10 INPUT"XINDEGRES FAHRENHEIT'"':F 

20 C=(F-32)*x5./9 

30 PRINT:PRINT F"DEGRES FAHRENHEIT CORRESPOND ñ" 
40 PRINT:PRINT C"DEGRES CELCIUS 

50 GOTO ій 


[NOTION d'ALGORITHME 


Le langage BASIC est un langage algorithmique. Ce mot 
algorithme te semble peut-étre rébarbatif mais il faut quand 
meme lire cette page ей la suivante сағ cette notion 


d'algorithme dépasse en importance le langage BASIC avec lequel 
tu te familiarises présentement. 


La première tache du programmeur consiste à exprimer, sous 
forme d'algorithme, le probléme qu'on lui demande de résoudre. 
C'est seulement après cette première étape que le problème sera 
traduit sous forme de programme dans un langage donné: soit Le 
BASIC, le FASCAL, le FORTRAN, le COBOL... etc. 


Définition: 


Un algorithme est une suite d'actions à effectuer pour 
résoudre un problème. Cette définition trés brève permet de 
comparer un algorithme au mode d'emploi pour l'utilisation d'un 
appareil. 


Far exemple, si tu veux téléphoner à un ami à partir d'une 
cabine téléphonique, tu dois: 
1- avoir une pièce de monnaie 
2- soulever 1 écouteur (le combiné) 
5- attendre la tonalité 
4- insérer la pièce dans le boftier 
5- composer le numéro de ton ami 
6- si...pas de réponse après avoir sonné 5 fois, raccrocher, 
récupérer ta monnaie, rappeler plus tard. 
7- ві...ғеропве, etc... 


On peut considérer ce mode d'emploi, 1 а 5, comme 1а 
description de l'algorithme d'utilisation d'un téléphone 
public. 


А la page 65 du "Frogramme d'études" 16-0081 du Ministère 
de l'Education, le mot ALGORITHME est défini ainsi: "Ensemble 
fini de règles déterminées servant à résoudre un problème au 
moyen d'un nombre fini d'opérations" (AFNOR), 


Un exemple d'algorithme: 


Le probleme:  Fréparer un programme qui calcule les racines 
d'une équation du second degré. 


Algorithme: 
orithme 5 


les données: soit ax + Dy -tog жб 
On veut calculer les racines хі et * аш moyen des 


formules classiques: 


X, = =b + b” = dar X, = =b = h2 = A4ac 


! 2a > 2a 
1~ Entrer les données a, b, c au clavier 
Les calculs et résultats: 
A” Si а = О et b = О et c = Q, alors imprimer INDETERMINE 


FIN (END) 


$- Si а = Ó et b = О, alors imprimer IMFOSSIELE 
FIN 


4- 5i ал Q, alors imprimer EQUATION DU PREMIER DEGRE 


x = —c/b Imprimer x 
FIN 
o e | ant 2 
5- Soit le discriminant D = b" ~ дас 
Si D«O, alors imprimer FAS DE RACINES REELLES 
FIN 
6- Four avoir des racines réelles, il faut que D soit >= 0. 
Alors nous aurons: x, boe VD Wa. = —b = yD 
2a 


Imprimer к, et х 


2. 
La traduction de cet algorithme dans un programme se 


trouve plus loin à l'exercice 16. 


Si tu veux devenir un habile programmeur, je te conseille 
de toujours faire un algorithme. Un probléme peut étre résolu 
avec plusieurs types d' algorithmes ей оп peut dire que 1а 


découverte d'un nouvel algorithme est un acte créatif qui fait 
appel à l'intelligence, à l'expérience et aussi à l'intuition. 
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(suite) 


Dans ce chapitre nous continuons l'étude des fonctions 
bibliothèques. Le mot bibliothèque est employé parce que ces 
fonctions sont des programmes utilitaires, écrits à l'avance 


dans la mémoire du C64, et auxquels on accède simplement en 


La fonction bibliothèque SOR permet de calculer la racine 
carrée d'un nombre qui forme l'argument de cette fonction. Ce 
nombre doit ètre >= o. 


Rappelle-toi qu'une fonction est toujours suivie de 
parenthèses entre lesquelles tu mets la valeur de 1 ‘argument . 
SQR est l'abréviation de SQuare Root (racine carrée). 


EXERCICE 14 Imprime la racine carrée de 100 (en mode direct) 
FRINT SQR (100) RETURN...L'écran affiche: 10. 


Si tu écris: 
PRINT SQR(-100) RETURN...Le C64 affiches ILLEGAL QUANTITY 
ERROR 
EXERCICE 15 Ecris un programme qui calcule la racine carrée 
des 20 premiers nombres. 


10 FRINT'NOMBRRES"TAR (10) "RACINE CARREE" 
20 FOR X=1 TO 20 

ЗО PRINT X TAaB(15)SQR(GO 

40 NEXT 


NOTE Racine carrée d'un nombre équivaut à puissance „5 de ce 
nombre. Donc FRINT SGR(100) équivaut à FRINT 1004.5 


La fonction SOR n'est donc раз indispensable: elle est 
cependant utile et plus rapide que l'exponentiation. 


жок 


EXERCICE 16 Ecris un programme qui calculera les racines d'une 
équation du second degré (voir l'algorithme page 152 


19 
20 
30 
40 
50 
69 
79 
80 
sa 


PRINT "AMAN t2 +BX+C=0" 

INPUT"XIJJALEURS DE ЖШ dm ЕТ ЖШ-;А,в,С 

IF A=@ AND B=9 AND С=0 THEN PRINT'MINDETERMINE": 
IF A=0 AND В=@ THEN PRINT"XIMPOSSIBLE": END 

IF а=0 THEN PRINT"XPREMIER DEGRE X=";-C/B: END 
D=Bt2-4xAxC 

IF D<@ THEN PRINT"'MMPAS DE RACINES REELLES": END 
M1-2C -B*SQRCD22/Cexa» 

Re=(-B-SOR(D))/C2x%xA) 


100 РВІМТ" Жир 1="; X1: PRINT"MKRe-":XK8 
110 END 


END 


Voici des exemples de valeurs attribuées à А, В, Сей des 


Entrées (valeurs de A,B,C) Exécution(résultats) E 
(QUIS Impossible š 
0, 509 O Indéterminé о 
0, 3, —6 Premier degré A 
Tu 2 Fas de racines réelles x 
іт gent teg Хі = š et X2 = -2 
I SO 7 Xi = 5.00006104 et 

X2 = 2.99993896 

Ici on sait que la réponse aurait du étre 

double: X1=7 et X2-3 (erreurs d'arrondis', voir 
TX. 


EXERCICE 17 


une racine 
l'exercice 


Fuisque E^ 2 correspond à Bsp, amène le curseur 


sur la ligne 60 et change ET 2 par B*B. 


Donne à А, E, C les mémes valeurs que 


précédent et tu auras X1=š et Х2=5, 
Tu viens de découvrir que l'opération d'exponentiation peut 


introduire des erreurs qu'on appelle 


dans l'exemple 


'erreurs d'arrondis'. 


EXERCICE 18 Comme dernier exercice avec SOR, écris un programme 
qui calcule la surface d'un triangle guelcongue 


18 
eo 
30 
40 
sa 
sa 
70 


(formule de Haro). 


PRINT" ЖШ.ОМОМЕЦЮЕ DE CHACUN DES 3 COTES": PRINT"DU TRIANGLE" 


INPUT ALBE 

PsCA+B+C)/e 

С-СРж<Р-АОЖОР-ВОЖСР-СОО 

IF C< =9 THEN РКІМТ"ЖИСЕ N'EST PAS UN TRIANGLE ! ": 
S=SQR C2 

PRINT"XSURFACE-"S 


END 


END _ et Гвтав | 


END et STOF sont des instructions qui arrétent le 
programme. Si tu regardes le listing de l'exercice 16 
Ci-dessus, tu retrouveras le mot END à 5 endroits. Note: END 
ne signifie pas seulement "Ein", il veut dire ‘retourner au 


niveau de commande directe’. 


La ligne 110 peut étre effacée car le Có4 arrëte le 
programme automatiquement quand il а terminé l'exécution de 
toutes les lignes d'un programme. 


END ou STOP servent à  arréter un programme en cours 
d'exécution. La seule différence entre les 2 instructions 
réside dans le message affiché sur l'écran. Avec END... READY. 
Avec STOF... BREAK IN...(no de ligne). Tu peux alors demander 


la valeur d'une variable en mode direct. 


Nous verrons dans un deuxième volume de cette série qu'il 
existe une Ze différence: END ferme les fichiers ouverts et 
STOF ne les ferme pas. 


END et STOP n'affectent pas les variables ni les pointeurs. 
Tu peux donc écrire CONT pour avoir la suite du programme. 
Mais si tu fais la moindre modification à ton programme, CONT 
ne peut plus étre utilisée ей la valeur des Variables est 
perdue (remise à zéro). 


Exemple: Le programme de l'exercice 16 recherche les 
racines réelles d'une équation du second degré. Si а, BF GC 
valent respectivement 1, 2, 2, alors l'écran affiche: pas de 
racines réelles... READY (END de 1а ligne 70). 


Fais le chargement (LOAD) de l'exercice 16. Fais exécuter 
ton programme et inscris les données du paragraphe précédent... 
Appuie RETURN. Ecris maintenant CONT et appuie RETURN: 
L'écran affiche: ILLEGAL QUANTITY 

ERROR IN ВО 

Ainsi tu peux savoir pourquoi il n'y a pas de racines 

relles... 


Autre exemple: бі А, B, C valent О, Z, -6 alors l'écran 
affiche: Premier degré Xz2... READY. Ecris CONT et appuie 
RETURN: L'écran affiche: 

DIVISION BY ZERO 
ERROR IN Go 


Ainsi tu peux savoir pourquoi il n'y a pas de racine du 
second degré. 


La fonction INT(X) nous donne la partie (anglais: 
INTeger) d'un nombre X qui forme l'argument de la fonction. 
Autrement dit un argument à virgule flottante est converti en 
un argument entier. 


EXERCICE 19 Ecris en mode direct: 


[Гу ту 
FRINT INT(79.467) RETURN...L'écran affichera 79 l'arrondi 
ЕКІМТ INT(-15.248) RETURN...L'écran affichera -16 inférieur 
[624 
Оп se sert souvent de la fonction INT pour  arrondir une 
valeur à un certain nombre de décimales, Far exemple 1 


kilowattheure d'électricité coute 3,62 cents et 564 kWh 
couteront 3,62 X 564 = 20,4168 dollars. ІІ уа 4 décimales et 
tu veux en conserver seulement deux, De plus, il faudra 
arrondir а 20,42 dollars car la Ze décimale est >= 5. 


EXERCICE 20 Ecris en mode direct: 


PRINT INT (20.4168%100+.5) /100 RETURN 


2042.18 


erp 


2042 
ا‎ і 


ТЕ 


20.42--> Valeur affichée sur l'écran 


Sur l'ordinateur c'est le 
point qui sépare Les 
entiers des décimales. 


La valeur „5% permet d'arrondir le prix pour donner une 
précision à Dans notre exemple, la valeur D а 
permis d'arrondir le montant à la décimale supérieure. Si le 
montant avait été 20.4148 dollars la valeur „5 n'aurait rien 
changer et le montant aurait été arrondi à la décimale 
inférieure. 


NOTE бі tu veux garder une décimale, tu remplaces les valeurs 
100 par 10. Four garder trois décimales tu mets 
1000 au lieu de 100,...etc. 


EXERCICE 21 Tu prends une obligation du Guébec de 5000 dollars 
à un taux d'intérét annuel de 12% avec réinvestis- 
sement des intéréts chaque année pendant 10 ans. 
Quelle sera la valeur du chéque que Le Gouvernement 
va t'adresser dans 10 ans? 


1 REM SOIT C-LE CAPITAL, I-LE ZX D'INTERET ANNUEL 
2 REM NSLE NOMBRE DE MOIS, Y=MONTANT VERSE/MOIS 


5 PRINT Sein 


136 


10 INPUT "CAPITAL";C 

15 INPUT "INTERET EN DECIMALES":;I 

20 INPUT "NOMBRE О 'АММЕЕЅ " JN 

30 PRINT "ANNEE " "Top 10) ° CAPITAL" TABC28)"INTERETS" 
40 FOR K=ØTON 

45 IF K=@ THEN 70 

SA IN=CxI 

69 C=C+IN 

TA PRINT K TABCI100INTCCX*X100*.52/100 TAB( 28) INTC INx190+.5)-/100 
89 NEXT K 

ЭВ РКІМТ"ЖСНЕОМЕ: $"; INTCCx*100*.55/100 


Le programme est construit avec des variables afin que tu 
puisses entrer différentes valeurs pour le capital, les 
intéréts et le nombre d'années. 


EXERCICE 22 Ecris la réponse de l'exercice 21 au moyen 
d'une seule instruction. 


25 PRINT CxC1*1/100»51N: STOP: REM FORMULE DES INTERETS COMPOSES 
Une lication pratique de la fonction INT( ) dans le projet 


F-1 ci-dessous: 


[PROJET F-1] Facture d'électricité d'Hydro-Québec. 


Le problème: Faire un programme qui calcule le coût d'une 


facture d'électricité d'Hydro (1983). Ajouter la taxe 
provinciale et donner le montant total (compteur avec 


multiplicateur 10 et tarifs Di). 


1~ Exprime une solution du problème sous forme d'algorithme. 


2- Traduis cet algorithme sous forme de programme (langage 
BASIC). 

хе Fais imprimer les résultats sous les mots: COUT TAXE 
MONTANT 

NOTES: 

1- Avec ce projet F-1, tu ne pourras pas calculer la premiere 


facture de l'année car 1а période de consommation chevauche 1а 
fin de 1982 (anciens tarifs) et le début de 1983. 

2 Les résultats seront parfois tronqués d'une ou deux 
décimales car le Có4 n'imprime pas les derniers тегов des 
décimales...à moins que tu lui donnes des instructions précises 
à ce sujet. 

3- А la suite du projet F-1, tu trouveras un projet Е-2 qui 
réseudra les problèmes de chevauchement, d'arrondi, de tarifs 
Gl, polyphasé ou non... etc. 


m 
ч 


Voici une solution du projet F-1: 


А- Algorithme: 


1. Les données: а) les constantes pour 1983 dans une 
instruction DATA 


Soient: T1 = .245%; la redevance d'abonnement quotidienne 
T2 = .029%: le prix d'un kWh pour un maximum de 


ЖО kWh/jrs à ce prix 


Tš -.O0362£$: le prix de chaque kWh supplmentaire 
TX  .09£$: la taxe prov 
b) les données à entrer au clavier. 
Soient: L2 le relevé présent (lecture du compteur) 
L1 le relevé précédent 
J le nombre de jours de consommation 


2. Les calculs: 
RA = 4жТі (redevance d'abonnement) 


Si LE Li, alors ajouter 10 000 à L2 (les 4 cadrans ont 
fait un tour) 


Sinon KC = (LZ-L1)#10 (multiplicateur 10... nombre de 
kWh consommés) 
KR = 3O*J (nombre de kWh à prix réduit) 


G3 КС KR, alors PR = KC*T2 (prix à taux réduit) 
CT = RA*FR (cout total avec taux réduit) 
ALLER à RESULTATS 


Sinon PR = KR*T2 (prix réduit) 
FM = (KC-KRO*TZ (prix maximal) 
CT = RA+FR+FM (cout total) 


5. Les résultats: 


ТА la valeur entiére avec 2 décimales (arrondie à 
1 cent prés) de (CT*TX) 


CT = la valeur entière avec 2 décimales (arrondie 
à 1 cent près) de СТ 
MO = CT + TA 


Imprimer COUT + TAXE = MONTANT 
Imprimer СТ; TA; MO 
Fin 
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B- Le programme: 


5 PRINT", 

10 Ті=.245: Te=.029: T3-.0388: ТХ=.09: REM TARIFS 1983 

80 PRINT"RELEVE PRESENT":PRINT"RELEVE PRECEDENT":PRINT"NOMBRE DE JOURS 
30 INPUT 12,11,11 

40 RAsJIxTi: REM REDEVANCE ABONNEMENT 

59 IF L2«L1 THEN Le=L2+19090: REM LES 4 CADRANS ONT FAIT 1 TOUR 
69 KC-(L8-L125x10: REM NOMBBRE DE КЫН CONSOMMES 

70 KR=30*xJ: REM ҚЫН À PRIX REDUIT 

80 IF KC<=KR THEN PR-KCxT8e: CT-RA*PR: GOTO129 

99 РЕ-КЕжТР: REM PRIX REDUIT 

100 PM=CKC-KRDXT3: REM PRIX MAX. 

110 CT=RA+PR+PM: REM COUT TOTAL 

118 REM***RESULTñTS*** 

120 ТаА=ІМТ‹СТЖТХЖ100+.5) “100: REM TAXE PROV. ARRONDIE 

130 СТ-ІМТ«СТж100%.52/100: REM COUT TOTAL ARRONDI 

140 MO=CT+TA 

150 PRINT" ШИЕ COUT + TAKE =MONTANT" 

160 PRINT CT:TA:MO 


Avant de présenter le projet F-2 et sa solution, étudions 
les fonctions: LEN, STR, et VAL ainsi que 2 instructions: 
GOSUR et RETURN que nous utiliserons dans le programme F-2. 


LENCO) | [57800] et [vant 


La fonction LEN permet de connaître le nombre de caractères 
qu'il y a dans une chaîne. Cette fonction te donne 1a longueur 
(anglais: LENgth) d'une chaîne en te donnant le nombre de ses 
caracteres. 


EXERCICE 23) Ecris en mode direct: 


FRINT LEN("Jean-Louis") 
l'argument de la fonction LEN 


L'écran affiche: 10 car la chafne"Jean-Louis" а une 
longueur de 10 caractères. 


Si tu veux savoir le nombre de caractères que possède une 
variable numérique, il faut d'abord utiliser la fonction STRE 
dont le rôle est de représenter un nombre sous forme de chaîne 
de caracteres. 


EXERCICE 24  Ecris en mode programmé: 


10 N-13245.86 
20 NE=STRE(N) 


O PRINT LEN (MS) L'écran affichera 9 


Explications: 
Ligne 10: met la valeur 15245,86 dans la variable numérique. 


13 


Ligne 20: la variable numérique N devient une variable chatne 
^ 
NE grace à la fonction STRE. 


Ligne 30: imprime le nombre de caractères que possède la 
chafne N£. Etant donné que l'argument de la fonction  LEN( ) 
est u [3 nécessaire pour 
transfe a variable numérique N en une variable chafne NE 
(Qu variable alphanuméri que), 


QUESTION L'écran affiche 9 et je compte seulement 8 
caractères dans la chafne "13245.86"...Po0urdquoi^? 


Réponse: Le 9e caractere est celui de l'espace que le C64 
réserve au début du nombre pour indiquer le signe du nombre (le 
signe + est sous-entendu). 


NOTE Les lignes 20 et 50 ci-dessus peuvent étre remplacées 
par une seule instruction: 
20 PRINT LEN(STR$(N)) 


Application: Voir FROJET F-2, sous-programme #00 page 144. 

La fonction VAL joue le röle inverse de la fonction STR#, 
c'est-à-dire que MOL (№) donnera la valeur numérique contenue 
dans la сһагпе МЖ. 

EXERCICE 25  Ecris en mode direct: 
FRINT VAL (NE) 
L'écran affiche 13245.86 c'est-à-dire la VALeur  numérigue 


représentée par la chatne NE ee 


NOTE Les seuls caractères permis dans l'argument de VAL sont: 
: le signe +, le signe —, et le point... 


Гвавив | et [RETURN | 


L'instruction GOSUR 300 veut dire ALLER а SOUS-FROGRAMME 
(anglais: SUBroutine) ligne по 300... 


Tu as étudié l'instruction БОТО... (ALLER à...) et tu l'as 
employée plusieurs fois. Regarde les lignes 110 et 120 page 
94: L'instruction GOTO 50 permet d'ALLER à la ligne 50 et 
c'est à cette ligne ЗО qu'est transféré le contrôle de 
l'exécution du programme. 


L'instruction GOSUR transfère aussi le contrôle de 
l'exécution du programme à une section appelée  sous-programme. 
Mais il y a une importante différence avec GOTO: l'instruction 


GOSUB ^et aussitôt 


EXERCICE 26 Ecris un programme qui utilise 8 fois la méme bou- 
cle d'attente d'une seconde. Refais le méme exercice 
en remplaçant les 8 boucles par un sous-proaramme. 


із Programme sans GOSUR (mauvaise programmation). 


10 PRINT",IBIINOUVELLES EXPRESS"! FORT-1TO10800:!NEXT 
20 PRINT"XNMÁAPPARITION";: FORTZs1TO1000:NEXT 

21 PRINT" D'UNE": FORT-1TO10800:NEXT 

22 PRINT"XNISDOUCOUPE";: FORT-1TO1000:NEXT 

ӘЗ PRINT" VOLANTE": FORT-1TO1000:NEXHT 

24 PRINT"XLES":: FORT-1TO12000:NEXT 

25 PRINT" ENVAHISSEURS": FORT-1TO1080:NEXT 

26 PRINT"NISONT LA!": FORT-1TO1000 :NEXT 

40 END 


Z- Programme avec GOSUR (tu sauves plusieurs octets (mémoires). 


19 PRINT"4EEESNOUVELLES EXPRESS": GOSUB1098 
28 PRINT"XR)EAPPARITION";:: GOSUB190 
21 PRINT" D'UNE": GOSUB190 

РР PRINT"XISOUCOUPE";: GOSUB1900 

23 PRINT" VOLANTE": GOSUB100 

24 PRINT"XILLES";: GOSUB100 

25 PRINT" ENVAHISSEURS": GOSUB 100 
86 PRINT"NISSONT LA!": GOSUB100 

40 END 

100 FOR T-1TO1000:NEXT 

110 RETURN 


EXERCICE 27 Tu as probablement conservé sur cassette l'exercice 
17 page 93. Introduis ce programme dans ton Cé4 et 
fais un sous-programme avec les lignes 75 à 100. 


19 PRINT "200958 A GAUCHE" 

11 РКІМТ"ЖЫНШ À DROITE 

18 PRINT'MMMPPUIE UNE TOUCHE 

Sp GETRA$:IFA$-""THEN 20 

25 PRINT " ДЕИДИ ИИИ" : РОКЕ650, 128 
39 IFC<OTHENC =0 

35 ІЕС>ЗЗТНЕМС«ЗЗ 

40 PRINTTABCCÓ" EZ 

45 PRINTTABCC)D" с>" 

50 PRINTTAB( Canal 
SSSERINLTABCOGO'L. C ^ 

69 РЕІМТТАВ‹ С> " оооооо" 

65 РЕІМТ "ОССО"; 

(0 GETB$:IFB$-"G"THEN GOSUB?TS:C-C-1:GO0TO 30 
71 ІЕВФ-"Н"ТНЕМ GOSUB75:C=C+1:GO0T0 30 

7e GOTO уй 

75 PRINTTABCCO" D 
88 FRINTTABCC)" " 
85 PRINTTABCCÓ" SZ 
38 PRINTTABCC)D" ^ 
95 PRINTTABCC)" " 
100 PRINT "СОС"; ! RETURN 


Ne pas confondre 
l'instruction RETURN 
avec la touche RETURN 
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Calcul du montant d'une facture d'Hydro-Québec, tarifs Dl 


Ou (61, multiplicateur variés et cour ant monophaseé ош 
polyphasé. Le calcul c couts se fera à + ou ~ 1 cent. 
Compléte l'algorithme du FROJET F-1 de la page 157 pour 
arriver au programme F-2 ci-dessous. Il est possible, sans 
algorithme, d'organiser un programme qui "marche" aprés des 
essais multiples et plusieurs transformations... Mais ce 


programme deviendra un programme spaghetti difficile à lire et 
тете l'auteur du programme ne s'y retrouvera plus s'il le relit 
quelques mois plus tard! 


Ce programmme F-2 est ‘formé de é sous-programmes 
structurés autour d'un programme principal. Je te conseille de 
tout le temps cessaire pour bien comprendre le 
séqguent i ce programme ей l'enchafnement du 
principal avec chacun des modules formant les 
sous-programmes. 


PROGRAMME Ғ-2 


NOTE: En pratique, chaque 
client d'Hydro est inscrit 
dans un fichier (voir уо1.2) 
et l'ordinateur a déjà en 
mémoire la réponse à la plu- 
part des questions posées au 
début de ce programme. 


5 PRINT "ш" 

10 INPUT"TARIFS SE OÙ 58"; ТАФ 
15 IF Тая< > "О"АМО ТА%< >"G"THEN10 
20 IF TAs$-"G"THEN 60508690 

30 IF TA$="D'"'THEN 00508700 

40 INPUT"XMULTIPLICATEUR..";MLI 
50 РКІМТ"ЖРКЕМІЕКЕ FACTURE DE L'ANNEE ЖШ OU Ne" 

55 INPUT РЕФ 

69 IF PF$C»"O"AND PF# >"N'THENSO 

70 IF PF$-"N"THEN JJ-0: GOTO S98 

80 PRINT"XNOMBRE DE JOURS FACTURES AVANT 1 JANVIER" 

85 INPUT JJ 

90 PRINT"HMMRELEVE PRESENT?": PRINT"RELEVE PRECEDENT?" 

95 PRINT"NOMBRE DE JOURS?" 

180 INPUTL2,L1,J 

110 RA-JxT1: REM REDEVANCE ABONNEMENT 

115 IF JJ< ОӘТНЕМ RA-RR-JJxC(T1-T45: REM FACTURE JANVIER 

128 IF Le«L1 THEN L2=190980+L2: REM LES 4 CADRANS ONT PASSE PAR вова 
130 КС-<1.2-1.12жМ1: REM NOMBRE КЫН CONSOMMES 

140 KR=3@xJ: REM NOMBRE ҚЫН ñ PRIX REDUIT 

150 IF KC«-KRTHEN GOSLUB 590:G0SUB 200 

160 IF КС>КЕТНЕМ GOSLUB 400:GO0SUB 209 

170 INPLUT"XIJAUTRE FACTURE ЖШ OU Ч"; AFE 

189 IF AF$="O"THEN 5 

139 END 

r99 REM---—-——------- 

200 REM IMPRESSION DES RESULTATS 

205 PRINT'OMTARIFS "ТАФ"1 1983 «TX Эх" 

219 PRINT "Hm COUT + TAXE =MONTANT#" 
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220 XsCT:PRINTCT; : 60508300 
230 X=TA:PRINTTA: : GOSUB3OÓD 
240 K=MO:PRINTMO; : 605083086 


245 PRINT 

250 PRINT"XRISI LE MONTANT DE TA FACTURE EST": PRINT"PLUS ELEVE" 
260 PRINT"NITU ES PROBABLEMENT PENALISE!": PRINT"XITEL. À HYDRO" 
270 RETURN 

EE L= 


300 КЕМ ZERO POUR AVOIR TOUJOURS 2 DECIMALES 

319 LT=LEN STR# #22 

320 LE=LEN STRE INTC K2 >> 

330 IF LT-LE=2THENPRINT'IN ": 

349 IF LT-LE=OTHENPRINT'I. GO "; 

359 RETURN 

398 REM --------<-“--- 

400 REM CALCULS SELON TARIFS MAXIMUMS 

410 PR=KR*T2: REM PRIX REDUITS 

415 IF JJ« ОӨТНЕМ PR=PR-CKRXJJ/JDxCT2-T5): REM FACT.DEBUT ANNEE 

420 PM=CKC-KRDXT3: REM PRIX MAX. 

485 IF JJ<>ØTHEN PM-zPM-CKC-KROxCJJ/JxX€( ТЗ-Т622: REM FACT.DEBUT ANNEE 
430 TA=INTC(CRA+PR+PM)DXxTK+.0299)k199)/1@0: REM TAXE ARRONDIE À 2 DEC. 
440 CT=INT( С ВА+РЕ+РМ+.9025) #100271090: REM COUT TOTAL ARRONDI а г DEC. 
450 MO=CT+TA: REM MONTANT TOTAL 

460 RETURN 

499g REM--------99---9- 

500 REM CALCUL SELON TARIFS REDUITS 

510 РЕ=КСЖТ2: REM PRIX REDUITS 

515 IF JJ4»8 THEN PR=PR-KCxJJ/Jx(Te-TS): REM FACTURE DEBUT ANNEE 
580 TAsINTC(CGCRA*PROXxTR*.00992x1005/100: REM TAKE ARRONDIE À г DEC. 
530 СТ=ІМТ‹ С ВА+РВ+. 0025) ж109)/100: REM COUT TOTAL ARRONDI а г DEC. 
540 МО=СТ+ТА: КЕМ MONTANT TOTAL 

550 RETURN 

SSSUREMIS--—--————- 

600 REM TARIFS Gi 

510 Ti=.245:T2=.04831:T3-.088:TX=.09: REM 1983 

620 T4zs.83:T5-.045:T6-.086: REM 1982 

630 INPUT " HMPOLYPHASE ЖОШ OU Ne"; POS 

649 IF PO# > "О"АМО PO$< >"N" THENS30 

850 IF POS$-"O"THEN Ті-с.735 

669 RETURN 

GSS REM /<---а-сест-т- 

TOO REM TARIFS 01 

710 Ti1s.2451!T8-2.0898:T3-.0368: REM ANNEE 1983 

720 T4=.23:T5=.027:T6=.0337:TX=.09: REM 1982 

730 RETURN 


Explication des lignes 500 а 350: sous-programme des 
décimales 


ы 


Il faut d'abord noter que si tu écris: 
PRINT 2: l'écran affiche 23 et 
FRINT l'écran affiche 25.95. 


Donc le C64 élimine automatiquement les caractères qui 
n'affectent pas le résultat obtenu: soient „ОО et О, 


11 est cependantnécessaire d'indiquer ces  zéros sur une 
facture et c'est le but du sous-programme des lignes 310 à 2 


\Ж(Х)) 
Fonction qui transforme une valeur 
numérique en une chaîne de caractères 
Fonction qui donne le nombre de caractères 
qu'il y a dans la chaîne X. 


Ligne 3510: LT = LEN(! 


tères que contient la Longueur Totale de la chafne. 


Ligne 320: LE = LEN(STR#(INT(X))) 
Fonction qui donne la partie 
entière d'un nombre. 
Fonction qui transforme la partie 
entiére du nombre en une chafne. 
Variable dans laquelle s'inscrira le nombre de carac- 
tères que contient la partie Entière de la chaîne. 


espace 

Ligne 520: IF LT-LE = 2 THEN FRINT" on 

curseur a gauche 

(No 4 page 35) 
le: 128.5 dollars. Dans ce cas: 
(S caractéres plus 1 pour le signe) 
(3 caractères plus 1 pour le signe) 
Donc l'instruction 330 ajoutera un zéro au montant, soit 
128.50 dollars. 


Il faut noter aussi que les tarifs pour les années 198% et 
1982 sont placés à 1а fin, dans un  sous-programme, pour 


faciliter les changements de tarifs au début d'une nouvelle 
année. 


La fonction КМО (anglais: RaNDom hasard) permet d'obtenir 
des nombres aléatoires compris entre О et 1 (c'est-à-dire О et 
DOO. uds L'argument de RND peut prendre différentes 
valeurs, mais le plus souvent on utilise RND(1). 


EXERCICE 28 Programme qui donne 10 nombres 'tirés au hasard' 


10 FOR Ісі TO 10 
ZO PRINT FOND CT) 


) NEXT 
Exécution du programme: 
L'écran affiche 10 nombres ‘tirés au hasard': . 183564016 


. 0468986548 
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NOTE 743801 
: 226 
.897233831 
.572916248 
.858895164 
-931229627 
.188382009 
.97293994 


Il y а beaucoup d'applications intéressantes qui font appel 
à la génération de nombres aléatoires. 


Far exemple, la fonction RND est souvent utilisée...1- pour 
simuler des jeux de hasard, 2- pour fournir un nombre entier 
compris entre deux valeurs, w dans des applications 
statistiques...etc. 


Premier exemple: Lancement d'un dé. 


Four simuler le lancement d'un dé, l'ordinateur devra 
fournir une valeur aléatoire et entière comprise entre і et 6. 


EXERCICE 29 Ecris en mode direct: 
PRINT INT (FEND (1) #6+1) 


Explications: 
a) Le nombre aléatoire obtenu par RND(1) est compris entre О et 
QOO S exe 

Lorsqu'on le multiplie par 6, le nombre est compris entre О 
et 2,9999... 
b) Après avoir additionné 1 à cette valeur, notre nombre est 
maintenant 

compris entre Ó et 6.99999... 
c) Enfin, la fonction INT nous donne la valeur entière du 
nombre. Cette 


Deuxième exemple: Lancement de deux dés. 


Four que l'ordinateur puisse simuler 1e lancement de deux 
dés, il faudra écrire 2 fois la formule ci-dessus et 
additionner les deux chiffres obtenus au hasard et dont la 


somme minimale sera 2 et maximale 12. 
EXERCICE 30 Ecris en mode direct: 
FRINT INT(RND(1)#é6+1) + INT (RND (1) #é6+1) 


EXERCICE 51  Ecris une fois + 2 au lieu d'écrire deux fois + 1 
pour sauver deux octets (bytes) et la formule du 


2 


lancement de 2 dés deviendra: 


FRINT INT(RND(1)*6) + ІМТ КМО (1) ж6) + 2 
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déterminé. 
„proprié 
се aléatoires, on 
ce sont des valeurs pseudo-aléatoires. 


4 ЕЗІ; 
с parfois que 


Troisième exemple: Dans les exemples précédents, l'argument X 
de la fonction RND(X) était plus grand que 0 (20) et on 
obtenait, au départ, la même suite de valeurs aléatoires (utile 


pendant la mise au point d'un programme... mais qui offre des 
inconvénients apres...) 


Si X = 0 on obtient une suite différente de valeurs 
aléatoires à chague départ car dans le cas oü X - O les nombres 


aléatoires sont générés par une horloge incorporée au C64. 


EXERCICE 32 Tu lances dix fois un dé. Ecris un petit programme 
qui fait imprimer les 10 résultats. 


10 FOR Ізі TO 10 
20 FRINT INT (END (О) #6+1) 


20 NEXT 
Résultats: 1 6 6 4 5 4 5 5 X. Dans chaque cas, tu 
obtiens un chiffre entier compris entre 1 et 6. Note tes 


ï Ecris de nouveau les 
instructions précédentes et tu obtiendras une 
valeurs aléatoires. 


QUESTION Comment faire pour qu'aucun n 


une suite de valeurs 'tirées au hasard' 


Réponse: Ce probléme sera résolu dans l'exercice Zë, 


EXERCICE 33 Се programme permet de rechercher un nombre 
aléatoire fourni par l'ordinateur (jeu). 


5 С=@ 

18 PRINT" ДР ТИ 0015 TROUVER UN NOMBRE ENTRE o ЕТ...?" 
15 INMPUT"XIBNOMBRE MAXIMUM"; M 

20 NA=INT(RNDC@D)x99+1): REM GENERATION DE NOMBRES ALEATOIRES 
30 INPUT'"MQUEL NOMBRE " ; NC 

35 С=С+1 

40 IF NC>NA THEN PRINT"EBIROP HAUT" 

50 IF МС<Ма THEN PRINT"NIITROP BAS" 

69 IF NC<>NA THEN ЗӨ 

70 PRINT"NNFELICITATION! id"; NC 

75 PRINT"NBITU AS TROUVE APRES'":PRINTC'"ESSAIS" 

ЗЯ INPUT"XRi AUTRE FOIS iH OU ME" P+ 

ЭЙ IF P$-"O"THEN 5 

100 END 
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LOI des GRANDS NOMBRES: 


Si tu lances une pièce de monnaie en l'air, tu as autant 


de chances d'obtenir le côté face que le côté pile. Tu peux 


piéce un grand nombre de fois, les probabilités nous enseignent 


que les résultats vont osciller autour de 50% pile et 50% face. 


Il serait long de le vérifier "sur la main"...Ton 
ordinateur peut te donner le résultat de cent essais еп moins 
de deux secondes! 


EXERCICE 34 Ecris un programme qui joue à FILE ou FACE et fais 
imprimer les résultats c'est-à-dire le nombre de 
fois FILE et le nombre de fois FACE. 


5 PRINTCHR$( 147): REM EFFACER L'ECRAN 

10 P-0: F-0 

20 INPUT'"MMNOMBRE DE LARNCEMENTS":N 

За FOR I-1 ТОМ 

40 CA-INTCRND(C 12x85: REM NOMBRE ALEATOIRE SERA 1 OU Ø 


50 IF CA=1 THEN F-F*1 La loi des grands nombres: 
60 IF Cñ=0 THEN P-P*1 nA pius il y a d'essais, 


70 NEXT I plus on se rapproche de la 
80 PRINT:PRINT F"FACES",P"PILES" 


98 507018 


probabilité d'arrivée..." 
Ici cette probabilité 
d'arrivée est déterminée à 


Résultats d'une expérience: 


100 essais ont donné 45,5) face 54,5% pile 
1000 essais ont donné 46,8% face 55,27 pile 

QOQO essais ont donné 50,46) face 49,9547 pile 
OO essais ont donné 50,16) face 49,847 pile ...Ici 
il faut au moins une demi-heure à l'ordinateur... Ты as le 
temps d'aller dfner! 


EXERCICE 35 Ecris un petit programme qui fait sortir au hasard 
fres sera 'tiré' au hasard. Fais imprimer ces 4 chif- 
fres en caractères inversés sur une méme ligne (LOTO) 


TO 4 

ND (O) #10) 
30 РКІМТ CHR£((18)C; 
40 NEXT I 


EXERCICE 56 Réponse à ta question de la page précédente. Le 
programme ci-dessous permet de sortir au hasard 
une liste de nombres compris entre 10 et 99 en 
S'assurant qu'on n'obtient pas 2 fois le méme nombre 
Sois patient car il faut prés de 2 minutes pour 
obtenir les 90 nombres différents! 


147 


© РЕІМТ "Ш": DIM К(902: PRINT СНК%с 5) 
19 FOR Ісі TO 90 

20 RC I2=INTC RNDC O) ж98+10> 
85 K=R(1) 

30 FOR Ј=І TO 1 STEP-1 

40 IF K=R(J-1) THEN 20 

50 NEXT J 

69 PRINT "i"R I); 


65 NEXT ! 


L'instruction DIM à la ligne 5 et 
la variable indicée R(I) à la li- 
gne 20 sont des notions nouvelles 
et importantes. Frends le temps 


nécessaire pour bien comprendre les 
explications de la page suivante. 


EXERCICE 37 Après avoir écrit LIST et appuyé RETURN, enlève 
l'instruction 65 de l'exercice Zé et ajoute les 
instructions 64 à 95 pour obtenir une meilleure 
présentation à l'écran. 


64 REMXINSTRUCTIONS POUR AFFICHAGE ECRANx 

65 С=С+1 

70 IF C-10 THEN PRINT"g" 

75 IF С-20 THEN PRINT CHR# 5): C=0 

80 NEXT I 

85 PRINT:PRINT"NOMBRES 10 À 99 'TIRE' AU HASARD..."; 
Эй PRINT"ILS SONT TOUS DIFFERENTS"; 


SAUVE ce programme(lignes 5 à 95) sur cassette ou sur 
disque. Il te sera utile dans une prochaine expérience. 


Dans l'exercice 36 que tu viens de  'sauver' (SAVE), il 
fallait s'assurer que les nombres obtenus au hasard ne se 
répetent pas. 


Nous avons utilisé le moyen trés simple qui consiste A 
inscrire dans un tableau à une dimension (ou liste) les nombres 
obtenus au hasard et à refuser les nombres dont les valeurs 
existent déjà dans la liste. 


Donc chaque nombre obtenu au hasard (ligne 20) est comparé 
à chacun des nombres inscrits dans la liste (lignes 50 а 50). 
Si un nombre identique est déjà dans cette liste, (ligne 40), 
le C64 redemande un nombre différent au hasard et lorsqu'il 
obtient ce nombre différent des autres, celui-ci est retenu 
dans la liste R(I) et affiché à l'écran (ligne 60). 
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Le langage BASIC ne possède pratiquement que 2 instructions 
DATA et DIM. 


DIM vient du mot DIMension. боп röle est de déclarer La 
, c'est-à-dire le nombre 


abl eau. 


Le numéro de l'élément le plus bas est toujours zéro et le 


numéro de l'élément le plus élevé est le nombre déclaré dans 
DIM. 


Dans un programme, l'instruction DIM doit étre exécutée 
avant toute opération sur la variable de DIM. Cependant, cette 


instruction DIM ne doit étre exécutée qu'une fois pendant le 
déroulement du programme. 


NOTE DIM est obligatoire seulement si le nombre d'éléments 
est supérieur a 11 (О à 19). Si le nombre d'éléments est 


égal ou inférieur à 11, le C64 va DIMensionner 


Dn voit ісі l'avantage et aussi la nécessité de conserver 
des valeurs dans un tableau afin de pouvoir les comparer, les 
trier, ... etc. Examinons са de plus près! 


Wu 
Ма Dëgrer 


"ын, 


„Инн 


Photo du circuit électrique : Didacticiel pages 154 а 156. 
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ou LISTE (en mathématiques vecteur) 


Dans l'exercice 356 ci-dessus nous avons employé pour la 
premiere fois une variable indicée K(1) avec une instruction 
DIM RETO 


Jusqu'à maintenant, nous utilisions des variables simples 


Désormais tu pourras, avec une seule variable  indicée, 
représenter toute une liste de valeurs, donc une succession de 
mémoires dont l'ensemble formera une zone. 


Supposons que le programme de l'exercice 36 t'a fourni les 
valeurs aléatoires suivantes: (éléments du tableau) 


Tableau monodimensionnel (ou liste) 


Recon [ C [Dans notre programme, ce tableau à une dimension 


RD est représenté par la variable indicée R(I). 

RO2) 

КС) Il est important de noter que: 

R (4) i~ R est le nom de ce tableau. 

кед) 2- (I) est l'indice qui peut prendre ici les va- 

[ leurs О à 90 pour indiquer l'emplacement de 

i l'élément dans le tableau. (Оп peut prendre une 

А | lautre lettre comme indicateur d'indice, soient 
(rs Ky Lis sete 

| і5- L'interpréteur du cé4 commence toujours un 

' І Itableau par l'indice ©. 

[ 1 а Les nombres aléatoires forment ісі les 

' éléments du tableau. Ces éléments s'appellent 

' les variables indicées. 

FR (86) S- Il faut dimensionner le tableau par une 

R(87) 15 instruction DIM suivie du numéro de l'élément le 

R(gED| — 24 plus élevé: DIM(90). Оп peut mettre une variable 


Бн 66 |comme indicateur de l'élément le plus élevé. 


ко es | Exemples DIM RCN) 


NOTE Dans ton programme de l'exercice 56, tu n'as pas mis 
d'élément dans la variable С(О) afin de faire coincider 


variable de contrôle I. 


EXERCICE 38 1- Fais le chargement (LOAD) du programme de l'ex- 
ercice 36. 2- Ecris RUN et tape RETURN. 3- Ecris sur 
un bout de papier quelques-uns des résultats affi- 
chés sur l'écran, par exemple les S premiers et les 
D derniers nombres... 


Та as maintenant, dans une zone mémoire, une liste de 90 
nombres aléatoires (10 à 99). 


Le nom de cette liste est R et chacun des éléments de la 
e est représenté par une variable indicée R(1), R(2), 
Jana КОВе? ул ete. 


EXERCICE 39  Vérifie, en mode direct, si tu as bien en 
mémoire les valeurs notées sur ton bout de papier: 


PRINT R(1) RETURN... FRINT K(2) RETURN 


EXERCICE 40 Utilise une boucle FÜR... NEXT et écris 
en mode direct: 


FOR J=86 TO 9O:FRINT R(J)3:NEXT d RETURN... 
Tu obtiens les 5 derniers nombres du tableau. 


Conserve ton tableau dans la mémoire du C64 car tu en 
auras besoin pour l'exercice 41. 


La SOMME et la MOYENNE des éléments de ta liste: 


Four obtenir la somme des 90 nombres de ta liste, tu 
utilises une boucle FÜR... NEXT qui fera 90 fois l'opération 
Suivante: 5=5 + КІ). А la fin, la variable 5 contiendra la 


Somme totale des 90 nombres. 


Four avoir 1а moyenne il faut diviser la somme par 90: 
M-8/90 


EXERCICE 41  Ecris en mode direct: 
FOR Ісі TO 90: S=S+K(1): NEXT I: MzS/90: FRINT 5,М 
Tu obtiens: 8-490535 et M=54,5 


EXERCICE 42 Fais entrer ces A instructions à l'intérieur du 
programme des exercices X6437: 


Les variables 5, M, КІ) у... sont 
automatiquement remises à zéro 
PRINT:FRINT"Sz" 6, "М=" M {quand tu écris RUN et tapes RETURN 


Une LISTE de CHAINES de CARACTERES 


Il est aussi possible d'obtenir un tableau de chafnes de 
caracteres. ІІ suffit alors d'utiliser un identificateur qui 
se termine par le caractère $. 


EXERCICE 43 Ecris un programme qui utilise l'instruction INFUT 
pour entrer les noms et prénoms de cing personnes 
et une variable indicée pour mettre ces noms 
(chaînes de caractères) dans un tableau 


d КҮШТІ 
й INPUT"NOM PREHODOM” ; HP 1: 
44 HEMT 
Les cinq noms et prénoms forment maintenant une liste qui 
se nomme NF£ et chacun des noms et prénoms correspond à une 
variable indicées МРЖ(1), NF£(2),... etc. 


Dans un tableau, l'élément varie selon 1а valeur de 
l'indice. Il est donc avantageux d'afficher le nom de се 
tableau мағнаны chaîne) et Ка NEUE Sp l'indice... C'est le 
rôle que 8) 


EXERCICE 44 Utilise le mode direct pour faire imprimer les 
cinq noms et prénoms que tu viens d'entrer dans 
la mémoire du Có4. 

FOR К=1 TO S:FRINT МРЖХ(К):МЕХТ RETURN 


EXERCICE 45  Introduis (INST) le numéro de ligne SO devant FOR 


dans l'exercice 44 (n'oublie pas de taper RETURN). 


Ton programme peut maintenant afficher le tableau sur 


l'écran. Ecris LIST et tape RETURN pour vérifier si la ligne 


5О est bien dans ton programme. Ensuite fais exécuter ton 
programmes (RUN RETURN), Les 5 noms et prénoms apparaissent sur 
l'écran. 


Note importante Si tu veux mettre les noms de tous les élèves 
d'une classe dans un tableau, par exemple 25 éléves, il faudra 
ajouter l'instruction: DIM NP$ (25) 


бі tu veux donner plus de souplesse à ton programme, 
remplace 25 par une variable numérique, par exemple М: DIM 
NP$ (М) 

Il faudra alors donner la valeur се М avant l'instruction 
DIM. Ne pas oublier de remplacer 1 TO 5 par i TO N: 
2 INPUT"NOMBRE D'ELEVES";N 
10 FOR I-1 ТОМ 


Ere ONE Eris un programme qui met les noms et 
prénoms des élèves d'une classe dans un tableau. 


IMBRE D'ELEVES";N 


DH Les tableaux à 2 dimensions 
S жупун seront étudiés au chap. 5 
o IMPUT"NDM PRENOM НРА ДЭ 

Әй НЕХТ 

ӘЙ FÜR Es] TÜ H: PRIMT HEED: MENT 


et 


ON... GOTO et UN... GOSUR sont des instructions 
d'aiguillages multiples. Les  aiguillages multiples peuvent 
être faits avec plusieurs IF... THEN, cependant on peut éviter 
la répétition d'une suite de IF... THEN par une seule 
instruction ON... GOSUR ou (GOTO) qui peut étre considérée 
comme une variante de IF... THEN. Exemple: ON X GOTO 400, 


500, 800, 600 a 


Cette instruction veut dire: Si la variable X vaut 1, le 
programme sera orienté vers la ligne 400, c'est-à-dire le 


premier numéro de ligne noté après GOTO. Өй: KI welt 
l'aiguillage se fera vers BOO... etc. 


Exemple pratique: 

Dans le didacticiel des pages suivantes, nous avons un 
MENU qui offre 6 choix (1-6). La variable qui représente le 
MENU est M. 


GOSUR 50 


IF M = 

IF M = GOSUE 15060 <— == 6 instructions]sont remplacées 
IF M = GOSUR 250 par une seule à la ligne 25: 

IF M = GOSUB 40 

IF M = GOSUR 40 25 ON M GOSUB 50,150,250,40,40,30 
IF M = GOSUB хо 


Le programme qui occupe les deux pages suivantes est un 
exemple de "didacticiel". 11 а été construit uniquement avec 
les notions "BASIC" que tu ав apprises dans les pages 
précédentes. 


Un didacticiel est un programme informatisé qui а pour but 
d'instruire de façon agréable 1a personne qui échange avec 
l'ordinateur pendant l'exécution de ce programme. 


Ce volume i te donne la première partie du didacticiel. Tu 
trouveras la deuxième partie dans le volume 2: (le calcul des 
résistances en parallele, le déplacement des électrons, la 
notation...etc). 


Four devenir habile dans la programmation, il faut créer un 
grand nombre de petits programmes (modules) plutôt que un opu 
deux longs programmes...Tu pourras ensuite juxtaposer plusieurs 
modules pour obtenir un programme plus élaboré. 


Fais le chargement (LOAD) de ten programme E-i (page 124) 
et utilise-le comme sous-programme dans ce didacticiel: 


Sec - SEO, c  Oki 
PRINT " имам никкаввввввввввввіз DIDACTICIEL" 


1 
8 PRINT SPC 35 "5.01 D'OHM < EXERCICES)" 

З PRINT SPCC13)"M@PAR L.PICARD" 

4 PRINT SPCK 11)"MMMPPUIE UNE TOUCHE" 

5 GETAS: IFAs-" " THENS 

6 PRINT"{"SPCC 185 "MENU" 

7 РЕІМТ"Ю! -8 UNE RESISTANCE (RHEDSTRT)" 

В РЕІМТ" ШР -Ш 2 RESISTANCES EN SERIE" 

9 РЕІМТ"ЮЕЗ-Ш UNE RESISTANCE EN SERIE ЕТ DEUX EN" SPCC6)"PARALLELE" 
18 PRINT"MEl4-5-6-N BYE BYE" 

18 E-1084: CO=55296: 5=54272: POKE 5+24,15 

15 INPUT"NITAPE UN CHIFFREC 1-6) "2M: ІЕМ 10КМ>6ТНЕМІ5 

га ON M GOTO58,150,250,40,40,30 

380 PRINT"ZAUREVOIR 

48 PRINT"HSUITE DANS VOLUME 2...": END 

50 J#="":A#S=" ["':gsc" |':R$-" — [':K$="" : GOSUBSDO 


52 PRINT: PRINT"FERME LE CIRCUIT: ІШ 

GET C$: IF С%<>"І" ТНЕМ55 

53 GOSUB 400: PRINT"[FAIS VARIER @+Ш OU @-Ш RH ET EAPPUIE ОШ"; 
PRINT D$ TABCCÓ: POKE 650,128 

GET H$: IF A=1 THEN 69 

IF H$="+" THEN GOSUB 350: С-С%1: GOSUB 450: GOSUB 300 

IF ñ=? THEN GOSUB 550: GOTO 5 

69 IF H$-"-" THEN GOSUB 350: C-C-1: GOSUB 450: GOSUB 300 


а 
а 


D o o Oo 
KZ 


70 IF ТІ/69-Н=>1 AND ADS THEN POKE S*4,0: GOSUB 550: GOTO 5 
72 IF H$="Q" THEN 80 

75 GOTO 65 

80 PRINT"LBIGUELLE EST LA VALEUR ШЕМ OHMS 

82 PRINT"EDE LA RESISTANCE VARIABLE RH СШЕНЕО5ТАТ >?" 
85 INPUT R: U=12: RH=UZñ: IFR-RH THEN 98 

88 PRINT"JE REGRETTE 

80 PRINT"XEDES EXPLICATIONS! ТАРЕ ЖШ OU ж! 

Se GET E$: IF E$="0" AND 2-1 THEN 105 

ЭЗ IF Е%= "О" THEN 100 

94 IF E$-"N" THEN GOTO 5 

96 GOTO 92 

88 PRINT:PRINT RH"OHMS BRAVOI":GOTO эд 


1@й PRINT",LPOUR OBTENIR LA VALEUR D'UNE RESISTANCE Ж 

101 PRINT"MIL FAUT DIVISER LA TENSION COU VOLTAGE) Ж/Ш 
102 PRINT:PRINT"AUX BORNES DE CETTE RESISTANCE PAR" 

123 PRINT:PRINT"LE COURANT AIW QUI LA TRAVERSE" 

104 PRINT:PRINT"Z.OI D'OHM:® LI/I-R" 

185 PRINT"EMI" |! "VOLTS"! PRINT"—— — =E" RH "IHM S >" 
126 PRINT A"AMPERES S)" 

110 РБІМТ"ЖЯТАРЕ UNE TOUCHE 


115 GET A$: IF A$="" THEN 115 
117 IF 2-1 THEN 2-0: RETURN 

1га бото 5 

150 J$-"":&s-"HA":BS-"ENE":RS-UERIN':KS-"": GOSUB 509 


155 D2INTCRND(C82*13» 

156 FOR K=Q TO 12 STEP 2: IF D-K THEN 165 
162 NEXT: IF D<>K THEN 155 

165 PRINT П%;: IF D=12 THEN A=.5: U=6 

170 IF D-21080 THEM A=.1: U=1 


BE HEN DELE UB Ne раз confondre le curseur du rhéostat | 

E Е SE Maer GER et le curseur qui clignote sur l'écran. 
Le curseur du rhéostat se déplace sur 

Se la résistance et la fait + ou - varier. 

185 IF П-0 THEN 8-5: U=@ 

180 FOR I=1 TO 6: IF C=15+D/2 THEN 210 

195 GOSUB 330: GOSUB 350: C-C-1: GOSUB460: GOSUB3O60 

208 NEXTI 


210 GOSUB 330: GOSUB 410: PRINT"[IIIMEN"TABCA4) A TAB(15) U "m" 

215 INPUT"XDgpXMIENMNERESISTANCE R1 =": Р 

220 RT=12/A: RH=U/AI R1=RT-RH: IFR=R1 THEN PRINT"BRAVO Ri="R"OHMS":: GOTO 2 
225 PRINT"JE REGRETTE!": FOR T=1 TO 1500: NEXT 

226 PRINT " OMA" ТАВС 24 > "L'ACCUMULATEUR":PRINTTABC£24) "DONNE 12 VOLTSM" 
227 PRINT TAB. 24) U"V PERDIS)": PRINTTABC24» "DANS ЕН" 

228 PRINT TABC24)"IL RESTES" 12-0 "ŒV":PRINTTAB(C 24) "POUR RIM" 

229 PRINT ТАВ‹ 24) "@" À "ШАМРЕБЕС S2": PRINTTAB( 24) "TRAVERSE(C NTR 1M" 

239 PRINT TABC272 "LOI D'OHM: ": PRINTTAB(C2?7) "R1-U/IM" 

231 PRINT TABCe7)"R1=" 18-U"/"A:PRINTTAB 27) "ER1-"R1"OHMSUNI" 

235 PRINT TAB( 19? " ШАРЕ UNE TOUCHE"; 

238 GET E$: IF E$-"" THEN 238 

249 GOTO 5 

250 J*$=","iñs="8 NE" :BH="E ZUPUIRS-UERIV 20" :КФ= "=": 00508500 

269 PRINT"HNMSUITE DANS VOLUME 2...0": END 

300 PRINT TABCC2" а": PRINT TABCC)CHRSC 180): PRINT"'O]":: RETURN 

330 FOR T=1 TO 1999: NEXT: RETURN 

359 G$-"7": IF НФ-"%" THEN G$=" " 

360 PRINT ТАВ‹С›Э%: PRINT ТАВ‹ С)" ": РБІМТ"ГГІ"?: RETURN 

4080 А=1: POKE E+565,177: POKE Е+575,177: POKE Е+576,178 

410 POKE S*5,0: POKE S+6,249 

415 POKE S+1,25: POKE 5,177: POKE E+129,32: POKE Е%169,121 

417 POKE S+4,1e9 

420 POKE CO*1698,0: POKE 5+4, 128: RETURN 

450 А=22-С: K=176+A: POKE Е+565,К 

460 POKE 5%1,28: POKE 5,214: POKE S+4,17: IF ADS THEN H=TI/60: RETURN 
470 POKE 644,16: POKE S*1,0: POKE S,0: RETURN 

508 PRINT",2": POKE 53280,1: POKE 53281,1 


501 PRINT"RFUSIBLE( ACCU" 
588 PRINT" mim MULATEUR " 
503 PRINT" БАШ Шыл + -" 

504 PRINT" m C dila pc 
505 PRINT"I m 12 m | 
506 PRINT"| m 1 
507 PRINT"| йш voLTSEG 1"J$ 
508 PRINT"I m Шы "As 
509 PRINT"! "B$ 

510 PRINT"I "as 

511 PRINT"| AMPEREMETRE "B$ 

518 PRINT"I VOLTMETRE "As 

513 PRINT"| TN ~ "B$ 

514 PRINT'I Шш o Dn Imo ШУ! "AS 
515 PRINT'I | I Іі "RS 

516 PRINT"I 188 1 a пг "ks 
517 PRINT") mi mi m ML | 
518 PRINT" siI c #Q=——a, = Bum 
519 PRINT" I | ШЕН" 


520 PRINT" RECETTE 200000 шщ" 
D рл жїр ин] С=21: RETURN 


pelien | 


MENU 


550 
851 
555 
560 
565 
570 
875 
580 
585 
590 
595 
599 
600 


POKE E+163,731 POKE Е+164,74: POKE S*1,85: POKE 6,177 
POKE 5%4,128 

FOR T=1 TO 200: NEXT: POKE S+4,128 

POKE E+565,48: POKE Е+575,48: POKE Е+576,32 

PRINT D$" PLUS ПЕ SM AMPERES!!! APPUIE gti ET ШШ"; 
IF A=? THEN PRINT "DTA OURT-C IRCUIT! 

GET I$: IF ІФа"#" THEN POKE Е+169,32: POKE Е+129, 121 
IF I$-"F" THEN POKE Е+163, 105: POKE E*164,95 

IF PEEKCE*1645-95 AND PEEKCE*1892-181 THEN 550 

IF РЕЕК‹Е+164) =95 AND PEEK(E+169)=32 THEN 599 

GOTO 575 

GOSUB ЗЗФіРКІМТ" " SPC(219)"0K" SPCC 1952 "CONTINUE" 
PRINT SPC 172) "ТАРЕ UNE TOUCHE": GOSUB 330: RETURN 


Ce "didacticiel" résume bien les notions "BASIC" que tu as 


apprises dans les 4 premiers chapitres et tu possèdes tous les 
éléments nécessaires pour interpréter chacune des lignes de ce 
programme. 


Four participer à ton effort de compréhension, nous ferons 


l'organigramme des lignes 65 à 75, 


ORGANIGRAMME des LIGNES 65 à 75: 


C=C+1 efface curseur | 
du rhéostat 
rant et un son du rhéostat 


E d ab 
aller i 5 


variation du cou- 


rant et un sop du rhéostat 


variables à O 
aller А 5 


Ligne 65 


fusible жағ 
ауес жағ 


ЕЕЕ curseur | ол 
du rhéostat < 


001 


РОКЕ 36876,0 


CHAPITRE x 


Série no 5 


Cette derniere série d'activités te permettra d'apprendre: 


Une interprétation du listing: "Le Fleur de Lis" fourni par 
l'imprimante VIC-1525. 


Les entrées clavier. (а fonction РЕЕК(197) et le tableau 
page 165 des numéros des touches du clavier. 


Les tableaux à deux dimensions. 

Les variables entières, 

Les instructions DEF FN et WAIT. 

Les fonctions trigonométriques: SIN, COS, ТАМ et АТМ. 
Le tracé de la courbe représentative d'une fonction. 
Les fonctions d'extraction: RIGHT, LEFT£, et MID. 


Le mode texte. 


Le Fleur de Lis. 


Il arrive souvent qu'un programme débute par l'affichage 
d'un dessin sur l'écran. Dans les programmes de ce chapitre 5 
nous avons choisi le Fleur de Lis. Je t'encourage à faire cet 
exercice et à le conserver sur cassette en vue de l'utiliser 


Comme sous-prodgiramme,. 


Tu peux travailler selon la méthode des FRINT, comme dans 
les dessins précédents, et améliorer celui qui t'est suggéré 
ci-dessous. Ce sera plus joli en haute résolution (vol 2). 


Listing Sur l'écran, apres 
RUN et RETURN. 


100 PRINT дЫ" 
101 PRIHT" 
102 РЕЇНТ" 
1863 PRIHT" 
104 PRIHT" 
185 FRIHT" 
106 РЕІНТ" 
107 PRINT" 
108 PRINT" 
109 PRINT” 
118 PRIHT" 
111 PRIHT" 
112 PRIHT" 
113 PRIHT" 
114 PRINT” 
115 PRIHT" 
116 PRINT” 
Lag GOTO 28 


‘Après chaque No de ligne, 

écris: PRINT" 

et tape les touches suivante 

pour obtenir le Fleur de lis 

102 19 esp.,RVSon,C K,RVSoff,C K [Tu peux commencer le dessin 

105 19 esp. ,RVSon,1l esp.,RVSoff ia colonne 20 de l'écran. 

104 18 esp.,RVSon,C К,2 esp.,RVSoff,C K 

105 18 esp. ,KVSon,4 esp.,RVSoff 

106 17 esp.,RVSon,C K,4 esp.,RVSoff,C K 

107 17 esp.,RVSon,C K,4 esp.,RVSoff,C К 

108 18 esp. ,RVSon,4 esp. ,RVSoff 

109 15 esp.,C D,C 1,1 esp. ,RVSon,C K,2 esp.,RVSoff,C Е,1 esp., 
(we FE 

110 14 esp.,RVSon,C V,3 esp.,RVSoff,i esp.,RVSon,2 esp.,RVSoff, 
1 esp.,RVSGon,3 esp.,C C,RVSoff 

111 15 esp. ,RVSon,C V,4 esp, ,RVSoff,C K,RVSon,C K,RVSoff,C К, 
RVSon,C K,4 esp.,C C,RVSoff 

112 13 esp. ,RVSon,C F,Z esp.,C I,C N,RVSoff,C Laf J,RVSon,C H, 
С 0,3% esp.,C D,RVSoff 


101 20 esp., C N, C H 


115 14 esp. ,KVSon,C F,1 esp.,C D,RVSoff,l евр.,КУбоп,і esp., 
RVSoff,C N,C H,RVGon,1 esp.,RV8off,l esp.,RVSBon,C F,1 esp., 
с D,RVSof f 

114 15 esp.,RVSon,C I,RVSoff,l esp.,RVSGon,C I 2 fois,2 esp., 
C 1 2 fois,RVSoff,1 esp.,RVSGon,C I,RVSoff 

119.18 esp. ,RVSon,C У,2 esp.,C C,RVGof f 

116 19 esp.,RVSon,C F,C D,RVSof f 


Les caractères graphiques et les caractères de commande 
sont parfois difficiles à identifier dans un listing fourni par 
certaines imprimantes, par exemple, le listing du Fleur de Lis 
de la page précédente... 


L'imprimante à aiguilles VIC-1525 marque des points dans 
une matrice 6 X 7: 


476060.” NN e 
CPL EE 2.6 ИПРИТ Les caractères alphanumérigques 
% fusa 102920972 46-5 et quelques autres sont séparés 
© o o %..егее.. entre eux par une colonne libre 
Өз; ө.%»...Ҙ.. Се qui n'est pas le cas pour 

€ срне O сельд hits les caractères de commande et 
Өө SIC SU ns < les caractères graphiques. 


11 devient alors difficile de construire un dessin à 
partir de son listing car des caractéres comme C M et C N 
présentent un aspect identique lorsqu'ils sont imprimés avec la 


52; M ZE 

б Ф. Oe, 

$4. Еа Е = 5 з Г 

000600 Sur l'écran, il n'y a pas de pro- 

bléme car les points sont disposés 

| e ` ө : S = Б 
M sur une matrice 8 X В dont 2 colon 
4 M : nes et une rangée sont laissées li 


bres pour séparer les caractères. 


Dans le cas du listing, on peut faciliter sa lecture en 
utilisant la fonction CHR£( J. Voici quelques exemples: 


DROITE GAUCHE 
Ün retrouve l'image du 


CHR£ (167) 


M 6 6© CHR# (165) 
сом СНЕЖ (170) БАН СНК (180) 
E Т CHR£ (182) Er CHR$ (181) 
Ë sk: GE CHR£ (161) 


inversé СНЕЖ(18) СНКЕ(161) 
^ 


Son 
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EXERCICE і Fais l'expérience: Remplace les 
lignes 101 et 102 par 


101 PRINT SFC(19)CHRE# (170) CHR# (180) 
102 FRINT SFC (18) CHR (16) CHRE (161) CHRE (146) CHRECI61) 


NOTE а) La fonction ӨРС(19) déplace le curseur de 19 espaces 
vers la droite. Donc le caractère suivant s'imprimera 
à la position 19+1 
b) Si tu utilises plusieurs fois la méme fonction avec le 
mème argument, il est avantageux (gain de mémoire) de 
la remplacer par une variable. Exemple: E$=CHR$ (52). 
c) Depuis la page 124 1a liste des programmes provient de 
l'imprimante C 4023 (matrice 8X8) 


EXERCICE 2 Tu peux sauver plusieurs emplacements mémoires en 
condensant les lignes 101 à 116 sur S ou 6 lignes 
BASIC. Fais l'expérience et compare tes résultats 
aux lignes 2 à 7 des programmes "GÜBE-SOUS" p. 178 
et "LA QUOTIDIENNE" page 176. 


EXERCICE 3  Dessine un cierge allumé. (Utilise une feuille 
quadrillée comme celle de la page 70). 


EXERCICE 4 Complète l'exercice 2 pour obtenir une flamme 
vacillante... 


ип л» gunn ` 


ияштик 2253 МШШ! 


LOTO : La quotidienne, pages 176 et 177. 
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[TABLEAUX А DEUX 


(en mathématique: matrice) 


Un tableau à deux dimensions est un tableau comportant des 
rangées et des colonnes. 
colonne O colonne 1 colonne 2 


Exemple: 
rangée О 


rangée 1 
rangée 2 
rangée š 


Rappelle-toi! quand l'ordinateur "fait ses comptes", 11 


Notre tableau ci-dessus a 4 rangées (0-3) et 5 colonnes 
(0-2). Donnons-lui un nom: étant donné que ce tableau 
contiendra tes notes scolaires, nous allons utiliser une 
variable numérique, disons qu'il s'appellera C...Mais comme ce 
tableau possède 12 cases disposées sur deux dimensions, il 
faudra ajouter deux indices à notre variable C. 


Frenons I pour les rangées et J pour les colonnes et nous 
aurons C(OI,J). Les indices (ou index de rangée et index de 
colonne) permettent de localiser rapidement un des 12 éléments 
de notre tableau. 


Exemples: soit Isi et (2, nous aurons С(5,2) c'est-à-dire 
l'adresse de la case située sur la rangée 3, colonne 7 (coin 
d'en bas, à droite). 


Si tu veux mettre la note 86 sur la rangée і colonne 2, tu 
écris:  C(1,2)86. N'oublie pas que le signe = n'a pas le тете 
sens que dans une équation algébridque; dans un programme BASIC 
il faut lire cette égalité comme suit: mettre 86 dans la 
variable C(1,2). 


EXERCICE 5 Construis un petit programme qui affichera un 
tableau des notes scolaires suivantes: 
MATH. FRANC. HIST. 


Fremière semaine 82 75 42 
Deuxième semaine 70 65 86 
Troisième semaine 78 68 29 
Quatrième semaine 90 во 85 


D ШІМ КЕРІК 

ій FOR [=й TO 3: FOR Тей TO 2 
18 IHPUTIHOTESI H 

2@й CT, Tish 

25 HEMT J: MEXT I 
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lu écris RUN et tu entres (INPUT) les notes. Lorsque tu 
inscris la 12е note et que tu appuies RETURN, l'écran affiche 
READY. N'écris pas RUN car 1а commande RUN mettra à zéro tous 
les éléments de ton tableau (n'oublie pas que ton programme ne 
contient pas encore d'instruction FRINT!). 


Ecris en mode direct: FRINT Соо) RETURN. L'écran 
affiche 82 c'est-à-dire l'élément de la rangée О colonne O. 
Fais d'autres essais... FRINT C(1,2)... etc. 


EXERCICE 6 Ajoute les instructions suivantes pour afficher au- 
tomatidquement tous les éléments de ton tableau: 


40 FOR I-O TO З: FOR J=0 TO г 
SO PRINT CC T y>; 

60 IF 1-2 THEN РБІМТ"ЖНЫ" 

YO NEXT J? NEXT I 


La а la fin de la ligne BASIC No SO fait imprimer les 
résultats sur 4 sections de l'écran. La ligne BASIC No 60 fait 
descendre le curseur de trois rangées dés que le Cé4 a imprimé 
1 5% éléments d'une rangée (colonnes 1, 11, 21). 


EXERCICE 7 Dans le programme ci-dessus, tu devais entrer les 
notes (INFUT) chaque fois que tu écrivais RUN. Four 
conserver tes données, inscris les notes(constantes) 
dans une instruction DATA et mets READ М dans une 
ligne Мо18. Tu auras cette version: 


PROGRAMME (deuxième version) 


5 DIM CCS3,8» 

10 FOR I=@ TO 3: FOR 17-6 TO г 
15 READ М 

20 CCI,J)=N 

eS МЕХТ J: NEXT I 

30 PRINT "Ы" 

40 FOR 1=@ TO 3: FOR 1-6 TO г 
590 PRINT CC I,J); 

60 IF 1-2 THEN PRINT "Xp" 

78 NEXT J: NEXT I 

вй DATA 82,75,92,70,86,65,78,68,75,90,80,85 


Fais RUN et RETURN. Avant de passer à l'exercice 10, 
mode direct: PRINT FRE(O)+65536. L'écran affiche le 
nombre d'octets disponibles: 38625. Ecris cette valeur sur un 
bout tu en auras besoin à l'exercice 10. 
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EXERCICE 8 Insère (INST) le symbole X entre la variable C et 
la parenthèse aux lignes 5, 20 et 50 de 


5 DIM CZ(3,25 l'exercice précédent. 


20 CXCI,J»*N 
50 PRINT Chl JD; 


Fais RUN et RETURN et t: | PRINT 
ЕКЕ (0) +65556. L'écran affiche 658 (5860285 . Donc en 
utilisant une variable entière, tu fais un gain de 5 octets 
(bytes) pour chaque élément du tableau. Comme il y a 2 
éléments dans ton tableau, tu économises 33 octets, 
c'est-à-dire 36 moins les 3 caracteres Ж que tu as insérés 
dans ton programme. 


Les variables entières (avec 4) offrent surtout un intérét 
"économique"... (un gain de place en mémoire). On les utilise 
Surtout pour définir des indices de listes ou de tableaux сағ 
ces indices sont obligatoirement des valeurs entieres. 
Application pratique: Dans le programme de LOTO "La 
Guotidienne" page 176 tu remarqueras l'emploi d'une variable 
entière pour définir les indices du tableau LTZ(1,J), Un gain 
de 120 octets (moins 3)!... 


QUESTION D'où proviennent les 3 octets économisés sur chaque 
élément du tableau? 


F Le C64 accepte X types de variables: і- type entier 
(avec „ 2— type réel, 3~ type chafne (avec Ж). Le (64 
considère comme réelle une variable qui n'est pas accompagnée 
de Ж ой de * . Une variable réelle demande 5 octets (format 
virgule flottante)... et une variable entière en demande 2... 
d'où cette économie de Ж octets (explications supplémentaires: 
VOl.22. 


NOTE La présence d'une liste ou d'un tableau dans un programme 
ralentit son exécution parce que les tableaux occupent la zone 
mémoire située au-dessus des variables et chaque fois que le 
déroulement du programme introduit une nouvelle variable, toute 


la zone réservée à ton tableau doit étre déplacée! 


CONCLUSION: Lorsqu'un programme contient un tableau, 
l'ordinateur lui réserve une "zone" spéciale dans ses 
emplacements mémoires; c'est pour cette raison qu'on appelle 
parfois un tableau: une zone. Les éléments d'un tableau 
(zone) se trouvent ainsi juxtaposés et les adresses des 
éléments du tableau forment une succession de variables 


Quand tu auras appris à manipuler les fichiers (volume 
11), tu verras que les entrées (INFUT) des notes qui forment 
ton tableau pourront étre conservées dans un fichier. Exemple: 
Fichier NOTES. 
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LES ENTREES CLAVIER 


De quelles facons l'ordinateur peut-il lire les 
; ven 


es trois principaux moyens qui permettent une "entrée 
clavier" pendant l'exécution d'un programme sont les deux 
instructions INFUT et GET et la fonction PEEK. 


1- INPUT (voir pages 3 à 128) 
1- GET (voir pages 48 et 46) 
3- PEEK(197) (ou peek (2030) 


Etudions ce troisième cas. Rappelle-toi d'abord que PEEK 
est une fonction et que les fonctions sont toujours suivies de 
parenthèses entre lesquelles tu mets 1 ‘argument . 


Avec la fonction РЕЕЕ ( ) le nombre entre les parenthèses 


Chaque fois que tu appuies une des touches du clavier, la 
mémoire 197 (ou 203) enregistre le numéro de cette touche 


EXERCICE 9 Ecris en mode programmé: 
10 PRINT РЕЕК (197) RUN et RETURN 


L'écran affiche 1. C'est le numéro de la touche RETURN (la 
dernière touche que tu as tapée). 


EXERCICE 10 Ajoute cette ligne 5 à l'exercice précédent: 


» 39 THEN 5 


RUN et RETURN 


Le С64 attend que tu tapes la touche numéro 39 (la lettre 
М). Les autres touches sont inopérantes (sauf "stop" qui arréte 
le programme). 


Si tu appuies М, le C64 sort de la boucle et imprime le 
numéro de la touche М: 39. Le caractère М s'imprimera aussi 
mais aprés READY... et si tu as tapé d'autres caractères avant 
М, ils seront aussi affichés après REAGDY...mais il у aura un 
maximum de 10 caractères affichés car le tampon clavier possède 
10 mémoires (ӨЗІ à 640), 


CONCLUSION: l'instruction de la ligne 5 ci-dessus peut donc 
jouer le meme rôle que GET 


Expérience: Introduis ton programme à-2 de la page 58 dans ton 
ordinateur.  Remplace l'instruction GET des lignes 1225, 1255; 
1245 et 1345 par la fonction FEEK(197). Exemple: 


1225 GET Nt: IF NE "N" THEN 1225 


16) 


Remplace cette ligne 1225 pars 
1225 IF PEEK(197) <> 39 THEN 1225 

Cette instruction produira le тете effet que la 
précédente. TU peux faire les mêmes transformations pour: 
—allumer la lampe L. (à 1235); —produire l'éclair E (à 1245) 
-—revenir au départ D (à 1342) 

Examine le tableau ci-dessous et tu connafttras les numéros 
des lettres L, E, D. 


TABLEAU(ou matrice) des NOS des touches du clavier: 


127 191 EZ 2: 247 


STOF 


Le tableau à 2 dimensions(ou matrice) ci-dessus a été  ob- 
tenu au moyen d'un petit programme en langage machine (vol. 7) 
Cependant tu peux obtenir le No de la plupart des, touches 


si tu exécutes ces trois lignes BASIC: 


10 РОК T-1 TO 100: NEXT: А-РЕЕК(197): IF A=64 THEN 10 
20 PRINT PEEK(197), APPLICATION: ligne 220 
зо GOTO 10 
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SIN, С06, ТАМ, АТМ: 


Мете si cette page et la suivante te paraissent un рем 
austères, ne "lache pas!" car ces notions te seront très utiles 
pour tracer les courbes représentatives d'une fonction. 


Comme toutes les autres fonctions, les fonctions 
trigonométridques doivent étre suivies de parentheses entre 
lesquelles tu mets l'argument, 


L'argument de SIN, COS, ТАМ (SINus, COSinus et TANgente) 
est la valeur de l'angle en radians. L'argument de АТМ (Arc 


Tu es probablement plus familier avec les degrés. Quand 
le rayon r d'un cercle fait un tour complet on dit qu'il а 
tourné 


d'un angle de 360 degrés ou 
d'un angle 2 Z radians (6,28 radians). n 
e 


560 degrés = 2 7 radians 
Donc 1 degré = 7/180 radians 
et ЗО degrés = 3O* 7/180 radians A 
Dans ce triangle rectangle, — hit“ c) 
le cóté А (opposé à l'angle 30?) est 2 fois B 
plus petit que le côté C (hypoténuse): A/C = 0,5 
On dit: SINUS 50 degrés = 0,5 
EXERCICE 11 Ecris en mode direct: 
PRINT SIN(CGO* 7/180) RETURN. L'écran affiche .5 


Tu as multiplié 50 degrés par 247/180 pour transformer les 
degrés en radians car BASIC travaille avec des radians! 


Dans ce triangle rectangle 
le côté B (adjacent à l'angle 60°) est 2 fois 
plus petit que le cóté C: B/C ч 0,8 
Оп dit: COSINUS 60 degrés = 0,5 


EXERCICE 12 Ecris en mode direct: 


FRINT СОВ (бож 77180) RETURN. L'écran affiche .S 
Donc sinus ZO? = cosinus 60% 
| c 
Dans ce triangle rectangle, ————————————» A 


les côtés А et Е sont égaux: A/B = 1 


Оп dit: TANGENTE 45 degrés = 1 
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EXERCICE 13 Ecris en mode direct: 


PRINT Там(45% 7 /180) RETURN. L'écran affiche 
.999999999 


On devrait obtenir 1. C'est un cas "d'arrondis*" dû à la valeur 
approchée de 77 


a tangente 509 = A/B = 


ole de 50 
soit environ 0,58. 


EXERCICE 14 Ecris en mode direct: 
PRINT ТАМ (ZO* 7 180) RETURN. L'écran affiche „577250269 


La fonction ATN (arc tangente) 
est l'inverse de la fonction TAN 


EXERCICE 15: 


ЕКІМТ АТМ (.577350269)*180/7. RETURN. L'écran affiche 30 
(degrés) 
L' argument est 180/45" degrés/radian 
la VALEUR de pour obtenir la 
la tangente en réponse en degrés. 
radians 
BASIC dispose d'une seule fonction trigonométrique 


inverse: АТМ. Quoi faire alors si on a besoin de l'arc 
cosinus ou de l'arc sinus? Nous allons voir que BASIC dispose 
d'une instruction qui permet aux programmeurs de définir ses 
Tu pourras alors mieux comprendre le 
programme de la page 168 qui calcule les angles d'un triangle 


quelconque. 


L'instruction DEF FN permet aux programmeurs de DEFinir 
ses propres FoNctions. 


Le nom de la fonction sera formé par ЕМ suivi cde la 


variable que tu choisiras et des parenthèses 
contenant l'argument muet de la fonction; tu mets ensuite le 
signe et la formule appropriée. 


1~ Définition d'une fonction "arrondi":  AR(X) 
DEF ЕМАК(Х) = INT(X#10+,5)/10 (arrondi à 1 décimale) 


z- Définition d'une fonction sinus qui transforme les degrés en 
radians: 


DEF FNSI(X) = SIN(X* 477/180) 


167 


АС (Х9 


Définition d'une fonction 
FNAC (X) = -ATNCX/SGR(-XæX+1)+ 7/2 


Il ne faut pas oublier que ces instructions DEF servent 
uniquement а définir une fonction. L'argument X est un 
argument formel (muet) qui prendra une valeur seulement si 1а 
fonction est appelée ailleurs dans le programme. 


Tu peux appeler (évaluer) une de ces fonctions en 
utilisant son nom. L'argument prendra la valeur spécifiée dans 
l'appel et non dans la DEFinition. 


NOTE Les sous-programmes ressemblent aux fonctions définies 
par le programmeur en ce sens qu'ils doivent aussi étre appelés 
à partir d'une ligne quelconque du programme. 


EXERCICE 16 Voici un programme qui contient des instructions 


triangle quelconque: 

1 REM CALCUL DES ANGLES D'UN TRIANGLE QUELCONQUE 

3 REM DEFINITION D'UNE FONCTION 'ñRC COS.' ЕМ DEGRES 

5 DEF FNACCKD=C-ATNCH/SORC-HkK+13)+4/2)k180/4 

т DEF FNARCHOZINTCOHX«10*.525/10: REM 'ARRONDI À 1 DECIMAL ' 

10 PRINT "LMNMALEURS ñi1,B1,C1 DES COTES DU TRIANGLE?" 

15 PRINT"CC1 EST LE PLUS GRAND" 

20 INPUT ^1,B1,C1 

25 IF C1<ñl OR Ci<B1 THEN 10 

30 CR-CBItB*C1t2-R1T8O/COxBIxXC1): REM CACOSINUS A 

40 CB=CAlte+Cite-B1t2)/C2xA1xC1): REM CB+COSINUS В 

45 IF СА-21 OR CB=>1 THEN PRINT"PAS DE TRIANGLE": END 

50 А=ҒМАС‹ САЎ: REM L'ARC COS. DE LA'VALEUR'DU COS A DONNE L'ANGLE A 
60 B=FNAC( CB)! REM L'ARC COS. DE LA'VALEUR'DU COS B DONNE L'ANGLE B 
70 C=1890-A-B 

80 PRINT "jA1-";R1;"Bi1z";B1: "C1-z":CI 

85 PRINT"NEANGLE OPPOSE AU COTE А1: A=":FNARCA); "DEGRES 

90 PRINT "ANGLE OPPOSE AU COTE Ві: B=";FNARCB); "DEGRES 

85 PRINT"NANGLE OPPOSE AU COTE C1: C=";FNARCC); "DEGRES 


Ecris RUN et tape RETURN. Le C64 attend l'entrée  (INFUT) 
des valeurs de chacun des 3 cótés du triangle. 


Exemple 1: Les côtés: Йісд B1=4 Ci=5. 

L'écran affiche les angles en degrés: 
Les angles: A=36.9 degrés Es5z.1 degrés C-90 degrés 

Les résultats sont arrondis à une décimale et l'ordinateur 


Les angles: A4-35.3 degrés Б=60.1 degrés С=84.6 degrés 
Exemple 3: Les côtés: Йілс R1= С1=4 
L'écran affiche: Fas de triangle. 
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La formule de base utilisée pour l'exercice 16 est celle 
de la loi des cosinus: a? = b* + с2--2вссовА. 
Donc cosf 25 2. et А = arc cosinus 


Etant donné que 
avons DEFin te КОМ 


NOTE: Il y a d'autres algorithmes oui permettent de résoudre le 
probléme en utilisant des relations trigonométri ques. 


[Le tracé de 


La fonction sinus nous permet de tracer une sinusoide ou 
un mouvement sinusoidal sur 1 ‘écran. 


EXERCICE 17 Utilise les fonctions SIN et ТАН pour générer un 
mouvement sinusoidal avec le caractére étoile de 
couleur pourpre. Départ à la iléme colonne de l'écran 


5 REM 8 EST LE FACTEUR D'ECHELLE DE LA FONCTION SINUS 

12 Y=SxSIN Ажт/180> +11: REM +11 POUR DEPART COLONNE 11 (SINUS ñ=0) 
80 A=A+20: REM L'ANGLE À AUGMENTE DE 20 DEGRES À CHAQUE ITERATION 
30 PRINTTABC Y) "ж" 

40 FORT=1TOISO:NEXT 

Se GOTO1n 


EXERCICE 18 joute une fonction SIN négative pour former une 
deuxième sinusoide opposée à la première avec 
départ sur la celonne 29. Couleur jaune pour la première 
Ssinuso?de et blanche pour la deuxième. 

5 REM Э EST LE FACTEUR D'ECHELLE CVOIR Р.170,А0 MILIEU) 

10 YsSxSINCAx*4/1802*411: REM DEPART SUR COLONNE 11 (ANGLE А=@› 

15 Yi1-2-SxSINCAx*«/18020*289: REM DEPART COLONNE 29 (VERS LA GAUCHE) 

29 A=A+20: REM ANGLE À AUGMENTE DE 20 DEGRES (SCHEMA P.170) 

30 PRINTTABC Y) "Ежа" 

35 PRINT тав‹ү1> "Ож" 

40 FORT=1TOIS@INEXT 

sa GOT010 


EXERCICE 19  Rempla l'étoile de l'exercice 17 par un oiseau 
ayant les ailes planches et le corps jaune Ia 
sinusoïde devra occuper 38 colonnes d'écran, 


5 REM 18 EST LE FACTEUR D'ECHELLE DE LA FONCTION SINUS 

10 Y=18XxSIN Ажч/180) +19: REM +19 POUR DEPART COLONNE 19 (SINUS A=8) 
20 А=А+20: REM L'ANGLE À AUGMENTE DE 20 DEGRES 

30 РРІМТТАВ‹ Y)" les IHE"; : FOR T-1 TO 75: NEXT Т 

40 PRINTTABCY)" He ": FOR T-1 TO 75: NEXT 

50 GOTO19 
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EXERCICE 20 Remplace l'oiseau par un skieur qui fait du slalom. 
Fais tourner les skis vers la droite ou vers la gauche 
selon que le Leur se dirige vers la droite eu la gau- 
che de l'écran. Ajoute des petits drapeaux là ой la si- 
nusoide atteint son amplitude maximale. Note: Un dessin 
symbolique du skieurs NN et /e/ Tu feras mieux 
(volume 2) avec la programmation des caractères 


5 PRINT", 

10 FOR Ісі TO 18: REM 360 DEGRES/29 = 18 (18 DESSINS PAR CYCLE) 
20 A=18%xSINCBx4/180)+19: REM x*4/180 MET LES DEGRES EN RADIANS(P.166) 
30 B=B+20 

40 IF I=15 THEN РКІМТ"ГЕВВВЬ "SPCC39»5"| " 

48 IF 1=6 THEN PRINT TAB(35)"Qa"SPC( 39)" |" 

50 IF 125 AND 1<15 THEN PRINT TAB(A)"/0/" SPCC385" ni 

55 IF I<6 OR І214 THEN PRINT TABCAD"NON" SPCCS72" ui 

6@ FOR T=i TO 150: NEXT T 

65 МЕХТ I 

(78 GOTO 10: REM RECOMMENCER LA BOUCLE 


Les 4 exercices précédents illustrent un mouvement 
sinusoidal avec un axe oy horizontal (orienté vers la droite de 
l'écran) et un axe о; 


les coordonnées (0,0) de l'origine se trouvant sur la onzième 
colonne de l'écran. 


Etant donné que la valeur du sinus varie entre moins un et 
plus un, il faut multiplier sa valeur par un facteur d'échelle 
(au coefficient d'affinité) qui donnera à 1а sinusoide une 
amplitude maximale de + ou ~ 19. (Moins 20 et plus 20 
provoquerait un retour chariot à l'écran du Có4). 


Sens de rotation du vecteur tournant mm 


Cercle de référence ——— y 
(Diamètre = nombre de colonnes - un) 


i 
I 

I 

! 

Point de départ ا‎ 
(Origine) 


H 0 Ы 


Fond de l'écran 
(Rien sur la dernière colonne) 


Projection des positions du “vecteur 
tournant" (facteur d'échelle: 19). 
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pn plus des instructions INFUT et GET et de la fonction 
280197), il y a aussi l'instruction WAIT qui permet de 
suspendre l'exécution d'un programme en attendant qu'une touche 
soit appuyée, 


Exemple: L'adresse 653 contient normalement la valeur О, бі 
tu presses la touche SHIFT, la valeur un s'inscrit dans 1а 
mémoire 6 Si tu relaches SHIFT, la mémoire 653 reprend la 
valeur ©, 


Mémoire 623 (état normal) 
— 


] Tous les bits sont à zéro 

EXERCICE 21 Ecris une instruction qui arréte l'exécution du 
programme jusqu'à ce que la touche SHIFT soit tapée 

WAIT 653,1,0 ou mieux WAIT 633,1 (car le Ze paramètre 

n'est pas ebligateire quand il vaut zéro) 

Application: Voir ligne 38 du programmes "GÜRBE-SOUS" page 178 


Mémoire 633 quand SHIFT est appuyée: 
— 


1 WAIT 6535,1 


Tf AND 1220 


Le Cé4 fait le ЕТ (AND) logique entre le profil binaire de 
la mémoire 655 et le paramètre (ici, 1). 


programme continue et exécute l'instruction qui suit WAIT 


Le rôle de WAIT est de tester l'état d'un bit (О ou 1). 
Un bit est une unité d'information (anglais: Binary digiT). Un 
octet (anglais: byte) contient 8 bits. Chaque bit peut prendre 
la valeur 1 ou О, 


WAIT 653,7 


Réponse: Le Có4 fera le ET logique (AND) entre le profil 
binaire du çor A de la mémoire 654 et la valeur binaire de 7. 


gom АТТЕМТЕ 


Le С64 attendra l'une ou l'autre des 3 touches: SHIFT ou 
(= ош CRTE; 

бі tu appuies sur SHIFT, le premier bit (dans 65%) prend 
l'état i: 00000001 

Si tu appuies sur G-, le deuxième bit (dans 65%) prend 
l'état 1: 00000010 
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бі tu appuies sur CTRL, le troisième bit (dans 6533) prend 
l'état 1: 00000100 


Puisque 1 AND 1 = 1, L'ATTENTE SERA TERMINÉE si tu appuies 


l'une des touches signalée ci-dessus. 
(Еоо1 е) 
1 AND 1 1 NOT 1 = QÓ 
о AND 1 шо] NOT Ó = 1 
1 AND О = = 1 
о AND O = Q O OR Ó = Ó 
tu mets un 2e paramëtre, = < 7 alors l'instruction WAIT 


son d'attente parce que, pour ce 2e paramètre, 


NOTES: 

1- La touche STOF ne peut interrompre l'attente de 
l'instruction WAIT 

2- L'attente de la touche SHIFT est intéressante parce qu'on 
n'a pas besoin de vider le tampon clavier (les caractères 
appuyés ne s'impriment pas après READY). 

5- Ne pas confondre le numéro d'une touche et le code de son 
caractère. Ex: le caractere М: touche no 39 (Tab. р. 168) et 
code 14 avec POKE (Tab. p. 78) ош code 78 avec PRINT... (Tab. 
des carac. ASCII p. 76). Ex, FRINT ASC("N") RETURN. L'écran 
affiche 78. 


Les fonctions RIGHT#, LEFT# et MIDE sont des fonctions 
d'extraction de caractères. Le traitement de texte au 
traitement de chaînes de caractères est rendu possible grâce à 
ces Ж fonctions associées à la fonction LEN étudiée au chapitre 
IV. Rappelle-toi qu'une fonction est toujours suivie de 
parenthèses entre lesquelles tu mets 1 ‘argument (ou paramètre). 


(ou une variable chaîne), le 
une variable ou une 


i- La fonction RIGHTS (droite) exige 2 paramètres: le premier 


EXERCICE 22 Ecris en mode direct: 


PRINT RIGHT£ ("JEANNE DUPONT, 4} 


L'écran affiche DUPONT, Cette instruction PRINT doit se 
lire ainsi: А partir de la droite de 1а chaîne "JEANNE 
DUPONT", extraire 6 caracteres. 

А l'exercice 22, mets 7 au lieu de 6 et l'écran  affichera 
un espace devant DUPONT, Fais d'autres expériences ей redis 
chaque fois la phrase: А partir de....de la 
chafne. ... extraire... 


2- La fonction LEFT$ (gauche) exige aussi 2 paramètres. 


EXERCICE 25  Ecris en mode direct: 


PRINT LEFT£ ("JEANNE DUPONT, 4) 


L'écran affiche JEANNE. Répète cette phrase: А partir de 
la gauche de la chafne "JEANNE DUPONT", extraire 6 caractères. 
Remplace 6 par В et l'écran affichera un espace et la lettre D 
après JEANNE, Fais d'autres expériences. 


5- La fonction MID$ (anglais: MIDle-smilieu) a trois paramètres: 
le premier est une chafne de caractères (ou variable chafne), 
le deuxième est un nombre entier qui indique à partir de quel 
caractère l'extraction doit commencer, le troisième est le 
nombre de caractères à extraire. 


EXERCICE 24  Ecris en mode direct: 
PRINT MIDE ("LE MONDE MERVEILLEUX DE W.D.",13,8) 


L'écran affiche VEILLEUX. Tu vois que cette fonction MIDE 
est générale et peut étre utilisée à la place des deux 
fonctions DROITE et GAUCHE.  Redis la phrase: А partir du 13e 
caractère de la chaîne "LE MONDE MERVEILLEUX DE А.П." extraire 
ES 


NOTE Le Зе paramètre n'est pas obligatoire si tu veux extraire 
tous les caractères à partir du caractère indiqué dans le Ze 
paramètre, Fais l'expérience, enlève 8 et l'écran affichera 
VEILLEUX DE W.D. 


Tu peux faire la concaténation (addition) de 
plusieurs chafnes de caractères ou extraire certains caractères 
d'une chafne ou de plusieurs chaînes pour former une nouvelle 
chaîne. Utilise les fonctions d'extraction pour résoudre le 
prochain exercice. 


EXERCICE 25 De la chatne: "Le no de Tél. du LABO est 357-8215 
et le code rég. 819" extrais le code rég. et le No 


de tél.  Mets-les ensuite dans une nouvelle chaîne. 


10 


T#="LE NO DE TEL. DU LABO EST 357-8215 ET LE CODE REG. 819" 
Ti: І0%(7%,10,35) 

IGHTE(TE, 4) 

MID#£(T#£,26,9) 

ЇМТ+Т1#+Т2Ж$ Тая 


L'écran affiche: TEL 819 257-8215. А 1а ligne 40, 1а 
fonction МІрЖ extrait 9 caractères à partir du caractère espace 
(26е) afin de séparer le code du no de tél. dans 1а nouvelle 
chafne. La ligne SO fait la concaténation (addition) des X 
chafnes extraites aux lignes ZO à 40. 
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des lettres d'un autre mot. Ainsi l'anagramme de AIMER 
est MARIE et celui de RAGE est GARE. Construis un pro- 
gramme qui formera le mot MARIE en transposant les 
lettres du mot AIMER. Tu fais arreter l'exécution du 
programme aussitôt que le mot MARIE est formé. 


19 MA$S="MARIE" 

29 FOR L=1 TO 5:М% 1.) =М10%С МАФ, і, 1): МЕХТ 

30 FOR L1-1 TO 5 

40 FOR L8-1 TO 5: IF L8-L1 THEN 122 

50 FOR L3-1 TO St IF L3-L1 THEN 181 

60 IF L3=Le THEN 121 

70 FOR L4-1 TO 5: IF L4-L1 THEN 120 

80 IF L4=L2 THEN 120 

90 IF L4-L3 THEN 180 

100 LS=15-{L1+Le+L3+L4) 

110 PRINT MSCL 12; MBC L.Ə > z MSCL 32; MEC L.4 >; MBC L.5 > 
115 PRINT: IF 1.1-2 AND L8-4 AND 1,3-1 AND L4-5 AND L5-3 THEN END 
180 NEXT L4 

181 NEXT L3 

122 NEXT L8,L1 


Après une itératien 
МЕХА L2oLS3sLb4- ES 


Le programme contient 4 boucles 
FOR...NEXT imbriquées. La boucle 
extérieure donne la valeur L1, 

la boucle suivante donne L2, etc. 
Ces variables L1,L2,...prendront 


férentes. Quand tu connais Li, 
L2, LE, L4, tu connais aussi 15; 
lows ЕН ОЛ ba tobda 21 19) 


EXERCICE 27 Un palindrome est un mot ou une phrase qu'on peut 
lire dans les deux sens. La chafne: "Léon а trop 


par rapport à Noel" est un palindrome. Fais un pro- 
gramme qui écrira la chaîne (inversé) 


10 PA#="LEON À TROP PAR RAPPORT A NOEL" 
20 L=LEN( РАФ) 

30 P#="" 

40 FOR I-1 TO L 

50 PAS=LEFTS PAS,L-1+1) 

60 A$-RIGHTSCPAS, 1) 

78 P$=P$+A$ 

80 NEXT 

90 PRINT P$ 

85 REM AJOUTER 65 IF I =18 THEN 89 
96 REM AJOUTER 75 IF I-11 THEN P$-P$*" " 


Four que les caracteres espace 
coincident il faut ajouter les 
2 lignes suivantes: 
65 IF I-19 THEN 80 


75 IF I-11 THEN P#=P#$+" " 
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ЕХЕ 


КСІСЕ 28 COMPARAISON. Ecris un programme de traduc 


“anglais. Mets les mots dans une instruction DATA 
ш =; 


әсе avec Š mots français et Š mots anglais). 


10 FOR 1=1 TO 5: READ МЕ% 12,М8%С 1): NEXT 
20 РКІМТ"ШАМОТ FR. ñ TRADUIRE:": INPUT Eis 


30 LI=LENKF1#) 

40 FOR 1=1 TO 5: F$a""i&s-"" 

SO FF*=MF3 1) 

80 Le-zLEhKFF$5: EGS=<LEFTS#FFS$, 1) 
CR FOR J=1 TO L1 


Ce petit progr. n'accepte pas 
les caracteres [z] et ІН Tu 
peux le compléter avec des 
instruct. incluant GET. 


80 EMS-MIDSCFE1$,J,12: IF Esc >EG# THEN 170 
80 MME-MIDSCF1$,J,L82: IF MMSCDFF$ THEN 170 


108 
116 
120 
130 
149 
150 
160 
170 
180 
eoo 


EXERCICE 29 Reprends l'exercice 


IF J-1-8 THEN 120 
РФ=ЕЕТФСЕІФ, 7-10 

IF Li-J-L8*1-80 THEN 140 
ED#=RIGHT#CF1$,L1-J-LE+1) 
F1$=F#$+MAS I) +ED$ 

З= ЕМ МАЖ 193: L1=L1-L2+L3 
FS=""iAg="" 

NEXT J,I 

PRINT:PRINT Е1%: GOTO en 
DATA TETE,HERD,CORPS,BODY ,BRAS ARM, JAMBE ,LEG,PIED,FOOT 


Ол dit que 1а chafne CORPS est 


plus petite que la chatne "TETE 
parce que le code C précède le 
code T... Voir tabl. page 76. 


267 p.141 et organise le pro~ 
grammme pour que le bulletin de nouvelles se déplace 
de la droite vers la gauche à l'écran. Tu peux 

ajouter le bruit des frappes d'une machine à écrire: 


10 PRINT " JIMANOUVELLES EXPRESSE" 

20 Аж-"жжжАаРРАКІТІОМ D'UNE SOUCOUPE VOLANTE м, 

25 B$="LES EXTRATERRESTRES SONT Lf! ы 

30 С%= "ВЕЗТЕ2 SUR ТЕКБКЕжжж . " 

40 D$-"PROCHAIN BULLETIN ñ SH" Tu espaces 

50 G#=A$:60SUB 100 - = —- — 

69 G$-B$: GOSUB 100 Le caractère inversé (DEL) fait re- 

65 G$-C$: GOSUB 100 culer le curseur d'une case et supprime 

70 PRINT"XDNEEI"D$: END le caractère qui s'y trouvait (No 9 p35) 

100 FOR L=1 TO LEN G$?) 

110 PRINT" Ша" MIDSCOGS,L,15:: GOSUB 200: внш 

120 NEXT L: RETURN (Cemment ebtenir le[T]? Explications 

209 FOR T-1 TO 100: NEXT: RETURN page 180 
D que le programme de l'exercice 29 a fonctionné 1 fois 

(RUN RETURN), le T inversé et le caractère qui le précède 


disparaissent du listing de l'écran: 


inv 


Ils continueront quand même à jouer leur rôle (ex.: le Е 
ersé pour la couleur blanche). Si tu fais le moindre 


changement dans la ligne 110, il faudra réécrire les 2 chafnes. 


Fou 


r mi comprendre cette ligne 110, fais en mode direct ce 


que les 2 chaînes font en mode programmé. 


NOTE А 1а page suivante tu as la léère partie de La 
GUOTIDIENNE...La ёте partie ainsi que l'adaptation à La 
quotidienne 4 paraftront dans le volume 2 
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OO -J D OU B i) FU — 


Se 
= 9 


m 


mme = 
N 0 50 


00 


р 


Frogramme d'une LOTO: "LA QUOTIDIENNE” 
DIM LT4X9,32.LC32,CC 32: POKE 53281,1 
PRINT'"V,Z3" TABC 19)" p ":PRINT TABC 19) " gg 88 ":PRINT TABC 19)" m" 


PRINT Тавс 138) " ШЕҢ ":PRINT тав‹ із› "8 m": РКІМТ ТАВС 17>›" Ж L " 
PRINT ТАВ‹ 179 " E ":PRINT TA 185" B':PRINT TAB( 15)" m H ШШ æ" 
PRINT TABC 142" gp ша Sa ww" :PRINT TAB( 132" FP ГЕТЕ KN 


PRINT TAB 13)" на 102 0 3 JE":PRINT TAB( 14) "% JH иаи m D ғ 
PRINT TAB 15 > " Sal Dan wJ M": PRINT TABC 18)" FF =" 
PRINT TAB. 19) "8 JE":PRINT ТАВ( 14) "8.070 QUEBEC" 
PRINT TAB¢ 132" а QUOTIDIENNE" SPCC27) "PAR L.PICARDB" 

PRINT TA&BCI112"UlgAPPUIE UNE TOUCHES" 

GET АФ: IF A$="" THEN 11 

PR INT "ЮТ SELECTIONNES 4 CHIFFRES QUI FORMERONT" 

PRINT"UN NOMBRE COMPRIS ENTRE 9099 ET 9999" 

PRINT"ENNMER/OIR TABLEAU DES GAINS NON OU ЖШ" 

GET B$: IF B$-"O0" THEN 60508 700:GOTO 18 

IF В%= "М" THEN 18 

GOTO 15 

PRINT"'",JMTAPEN LE CHIFFRE SELECTIONNE ET": PRINT" AMAPPUIE ‘RETURN'Æ" 
FOR I-0 TO 8 

FOR 1-0 TO 3 

READ LTX 1,10: PRINT" MM" TABC 149LTXC I,J); 
МЕХТ 1: PRINT: IF І=9 THEN 3e 


Pour ne pas perdre la valeur 


PRINT: NEXT I précédente K c T 
RESTORE on fait une et? 
PRINT SPCC6)"SELECTION"; "permutation 3| SR 
ПРЕМӘ,Ө Circulaire? 


ligne 210 
C'est de cette maniére que 

tous les programmes réalisent 
l'échange. 


FOR I=@ TO З 

INPUTHE,A: IF A>9 THEN 37 
КӨЗІ; 

PRINT" "$: NEXT I 

М=144: V-30: R=28: J-158: N=@: M=18: Y-0 

PRINT";j" SPC(8)"SOTOM "Lo QUOTIDIENNE" 

REM F1 EST LA PREMIERE DES 4 TOUCHES À DROITE 

PRINT:PRINT SPCC 72 "ATA SELECTION: >; 

FORI-BTOS:PRINT"Z"Lc I)"B";:NEXT: PRINT SPCC 37)" ШЕИМШТЕРЕ Fi" 
PRINT: CLOSE2 


D PRINT "ED" CHRE N? " e" 

Ө PRINTCHRS#CY)" @"CHR30 MD" |"CHRSC J)" € 
A PRINTCHR3$CVO" ` "CHRE NO" | "CHRE J)" 7 
A PRIHTCHRZSC Ч) " N"CHRSCND"["CHR$CJÓO",/ 

A PRINTCHR$CR2" в —— —"CHR*( R)" . 

D PRINTCHR$ J)" Z" CHR3 ND " | "EHRSC V > "N" 
D PRINTCHR*C J>)" /ZJ"CHR$CN2" ["CHREC V)" N 
Ө PRINTCHRS J2" @"CHR3 ND" | "CHR V>" $9 
A PRINTCHRS М)" әш 

е PRINT 


5 PRINT SPCC 122CHR£$C 1082 CHR£C 38 )CHR*( 110) 


196 FOR Ісі TO 3: PRINT TAB 18) CHRS#C 157 CHRS#CS2)CHRS#C 165): NEXT 


7 PRINT TABC 1@2?2CHR# 1672: PRINTTABC13)CHRS#C 163) 


200 FOR T=1 TO 199: NEXT: REM RALENTIR LA ROUE 


8 REM K=VARIABLE SERVICE POUR ROTATION COULEURS 
€ K=J: JzM: L-R: R=K: MzV: V=L: N=M 


215 IF Y=4 THEM GOSUB 600: GOTO258: REM Y=BOULES CHOISIES HASARD 
БІТ IF W>Ø THEM GOSUB 599 


o IF PEEK 197)=4 THEN GOSUB 588: REM TAPE Fi POUR AVOIR 4 BOULES 
© PRINT"L[IIIIIIIIIIIIIIIITI)':GOTO1!0800 


SA PRINT:PRINT'MENCORE 1 FOIS gom OU 948701": 


0 GET ЕФ: IF ЕФ-"О" THEN 18 
@ IF ЕФ > "О" AND E$<>"N" THEN 260 
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560 X=K+3: PRINT"g 
570 RETURN 

600 REM DANS LE VOLUME 2, CE PROGRAMME SERA ADAPTE À LA NOUVELLE 
601 REM QUOTIDIENNE 4 ET LE TABLEAU DES GAINS SERA COMPLET... 

IF CC1)=CC 8) AND L< 12=L<8)ANDEC 12 =LC і >ANDC£ 3» LC 32 THENGS="60$":GOTO6SO 
811 IFC 2)=0C¢ 3) ANDLE 2) =. 3) ANDCC 2) =. Ә2АМПСС 12 =LC 12D THENGS$="60$#":GOTO6SO 
БІР IF CCi)=LC2) AND C(2)=L¢ 12 AND Cé3)=LC3) THEN G$="20$": GOTO 659 
БІЗ IF CC1)=LC3) AND CC2)=LC 2) AND CC3)=LC1) THEN ӨФ= "20%": GOTO6SO 

B20 IF L(e)=L(3) ANDC(2)=CC3) AND LCe»-CC2) THENG$-"10$": GOTO 650 

625 IF L(2)=C( 2? AND LC322CC 3) OR LC2)=CC 3) ANDLC 3) 2CC 2) THENGS="S$":GOTO 659 


N لد‎ > m 


322 DATAO,0,0,0,1,1,1,1,8,8, 


280 END 

500 REM 4 CHIFFRES AU HASARD 

510 CC Y? 2 INTCRNDCO2 10» 

520 2-81: Weit E-1084: СО=55296: 5=54272: POKE 5%24,15 

S30 POKE Е%??З,2: POKE CO*?73,8 

540 POKE S+1,85: POKE 5,176: POKE S+5,0: POKE $16,240 

545 POKE S+4,17: FOR T-1 TO 20: NEXT: POKE S+4,16 

550 FOR T-1 TO 500: МЕХТ: POKE Е+7?3,32: POKE 5%1,22: POKE 5,227 


555 POKE S*4,17: FOR T-1 TO 20: NEXT: POKE 5%4,16: POKE S*1,0: POKE 5,0 


30 RETURN 

ӘЙ PRINT"TU GAGNE "G$" ТАРЕ SC 

55 GET D$: IF D#{>"D" THEN 655 

AA REM LES GAINS 

01 PRINT CHR$C142"LZRBBBBEBIITON CHOIX:E ";:FOR I-O TO З: РКІМТ" "610202: 
02 PRINT:PRINT" евроро І МАТЕЈЕ ";:FORI-OTOS:PRINT";"CC I2: : NEXT 


703 PRINT:PRINT"IZEEN'IMPORTE QUEL ORDRE 

704 PRINT"zZH CHIFFRES DIFFERENTS 

795 PRINT TABC11)"1000$ 50%": РКІМТ"ШІ PAIRE:S 1050# 100%" 

796 PRINT"W2 PAIRES";: РКІМТ"Ш 1150$ 200%" 

707 РКІМТ"ШІ TRIPLET 1250% 300%": РКІМТ"ШІПЕМТІСПЕ5: 150% 

708 PRINT" 3 ПЕВМІЕРВЅ "ЅРС‹ 8) "CHIFFRES":PRINT"gDIFFERENTS: 50$ 10% 


709 PRINT" Ші PAIRE: 60%  2e0$":PRINT"NIDENTIQUES:(g 100% 

710 PRINT" 82 DERNIERS"SPC(8)"CHIFFRES":PRINT"IBDIFFERENTS : 3 5% 5% 
715 РБІМТ"ШІПЕМТІСМЕС: 10% ----":РКІМТ:РЕІМТ" ШӘРРМІЕ UNE TOUCHES"; 
720 GET АФ: IF A$="" THEN 720 

725 PRINTCHR#( 142 GOTO 18 


e 
810 DATAS,5,5,5,6.6,6,6,7,7,7, 


ouvre (ОРЕМ) un fichier d'entrer clavier (No oi 
entre (INFUT#) des données et la ligne 90 ferme le 
Le but de ces lignes est d'attendre une entrée des 
оез sans la présence du ^7? qui apparaft normalement après 
une instruction INPUT. (Volume 2) 


[LE MODE TEXTE |: Dans le programme ci-dessus, tu ав remarqué 
que le tableau des gains (les lots) était écrit en lettres 
5. Dans ce cas on dit que l'écran affiche le mode 

d ais le chargement (LOAD) du programme: "LA QUOTIDIENNE 
4" et écris RUN 700 puis tape RETURN. L'écran affiche le 
tableau des gains en mode texte, 


ur obtenir le mode texte dans un programme, il suffit 
ire: PRINT CHR#(14) et pour revenir ам mode graphique 
(état normal), tu écris: PRINT CHR#(142). Regarde les lignes 
701 et 7 ci-dessus et tu découvriras les 2 instructions qui 
permettent de passer d'un mode à l'autre (codes: voir tableau 
page 76), NOTE: Tu obtier les mêmes résultats еп mode direct 
tu appuies à la fois C= et SHIFT. 
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"ТАВСХ›ССҮ›)›" ">: POKES4273,0: Y-2Y*1 


NEXT 


om dg Bg D س‎ 


0 0 


(л 
ES 


O OuUug:cou----mommomogozsmomuo«u 
t DO Bi mium S DO YD OA me © © D A 


iD 
ES 


Frogramme d'un jeu de hasard: —"OÜ0BE-SO0US" 
DIMC# 4,4),С1% 4): POKE 53280,5: POKE 53281,1 
PRINT" ШЕ" SPC. 19)" | " SPCC 38)" ЫШ" SPC. 38)"g Wi SPC: 370" =" 
PRINT TABC18)"3 m" SPCC 35)" mg" SPC( 345" Ж ШЕҢ" SPC( 35) "4 CN 
PRINT TAB! 152" = FE WE шы" 5РСС29›" Р" Wa m KN 
PRINT ТАВ‹ 13) " т ГЕТЕ! эш" SPC. 26)" i CIE ES m 


PRINT TAR. 142", JH G mi a m Oh JE" SPC 29) "Д Дән w ш" 
PRINT "Top 1809" wm": PRINT TAB 19)", Ju" 
РРІМТТАВ‹ 13)" ШЯРЕОТЕСТІОМ DU"SPCC 27) "CONSOMMATEUR"SPCC 28) "PAR L.PICARD" 
PRINT SPC 112"AWESAPPUIE UNE TOUCHE 
GET АФ: IF A$="" THEN 10 
FOR J- 1 TO 4 
FOR Ісі TO 4 
READ C 1,70 
NEXT I: NEXT J 
PRINT"LMITU EMPRUNTES 5.00 $": PRINT"CHAQUE ESSAI: 25 CENTS 
PRINT"gNETU GAGNES 190 PIECES DE 25 CENTS SI LES 4 CARTES SONT IDENTIQUES 
РКІМТ"ШИТІ) AS 1 COUP GRATUIT SI TROIS CARTES": PRINT "SONT IDENTIQUES" 
PRINT"gZMAPPUIE UNE TOUCHE" 
GETA$: IFA$=" "ТНЕМЗЯ 
PRINT" AH" : PRINTSPCC 16) "0,25%" 


Note: Un tableau ne doit pas étre 
redimensionné (DIM)... autrement 


PRINT" Br-AGOBE-SOUSEH eg” dit, il ne faut pas retourner au 
PRINT" 7 аа, No de ligne contenant l'instruc- 
PRINT" | z5.o00ms| tion DIM pendant l'exécution d'un 
DR RR Ж cue cL Er programme. 

PRINT" йт II ll III 

PRINT" наны ә 9| P uuu 

PRINT" шаша || || шаша 

PRINT" IB LI ы ы LU SIMS 

PRINT" І іші шш 

PRINT" os ште" 

PRINT" І І 

PRINT" mu "qa" 


PFINT"(mmPS CENTS POUR TOURNER Lñ MANIVELLE" 
PRINT" AMMMPPUIE SHIFT": VA=S: S-54278 

B= "EME ВВВ" : Са=1: Е-1024 

WAIT 653,1: REM ATTENTE DE LA TOUCHE SHIFT 

FOR L=1 TO 3 

PRINTES"SSOGRPBRERPPREPREBI" CHRE 32» CHREC 32) "MIC" CHRsC32» "II" CHR&C 1909: 
POKE S*24,15 

POKE 6%5,0: POKE S*8,240: POKE S+1,38: POKE 5,125: POKE 5+4,33 

FOR Ізі TO 3: РЕІМТ"ШО"СНЕЖ 16127: NEXT I 

PRINT"II"CHRsC 18) CHR&C 1600 CHR&C 146) CHRSKC 1619: 

PRINT"IBE"CHRSC322CHR3C322 "lili" CHF 32) "lg" CHRE 32) "INI" CHR 144 )CHRS#C 13727 
PRINT "Ш" СНЕЖ 1612 "Il" CHRSC 161) "IBI" CHRE 182 CHRS#C 1600 CHRSC 146 CHR 161); 
FOKE S+1,19: POKE 6,162: FOR T=1 TO 20: NEXT 

PRINT "MME": : NEXT L 

POKE S+4,32: POKE S*84,0 

FOR K-1 TO 3 

FOR Ізі TO 4 

IF Ізі OR 1=4 THEN 2-40: A$=B$: C=30 

IF I= ë THEM 2-0: ñ#=Bs#+"D)": C-15 

IF I-2 THEN 2-80: A$=B$+"m": C-15 

OM са GOTO 90,92,94,96 

PRIMT"g"A£ZCEO І,1205РССВОСЯ( І,Р26РС(22С%С I, 3») SPCCE)CSC I, 4) :FORT-1TOC: NEXT 
POKE E*328*2,32: POKE E+329+2,32: POKE E+332+Z,32: POKE E4335*42,328:G0T0150 
PRINT ФСФ І,2205РС( ZCS I,3)SPC(2)C# 1,4): FOR Tel TO C: NEXT 

POKE E*38942,38: POKE E+332+2,32! POKE E«33542,38: GOTO 150 

PRINTASCSC І,З25РС( EOC 1,4):FORT=1TOC:NEXT 
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85 POKE Е+332+2,32: POKE E+335+2,82:GOT0150 
96 PRINT A$C$ 1,4): FOR Т=1 TO C! NEXT 

87 POKE Е+335+2 „зг 

150 FOR T=1 TO C: NEXT 

158 NEMT I: NEMT K 

155 M-INTCRNDCOD X4 € 12 1C1$C CAD =C%CK, 10 TPRINTBSCSCX , 1) 

190 В%=В%+ "ШШШ" :СА=СА+1:1Ғ CA=STHENS83 

195 GOTO7S 

583 РОКІ =1Т04:0‹ ID=ASC С1ФС 10): NEXT 

585 IF D(1)=D(2) AND DÉ 1 =DC3) D AND 0‹1)=0‹4) THEN 592 

586 IF ПС 12-ПСВ) AND Dé 12-003) THEN 610 

587 IF DC1)=DC2) AND DC1)=D(4) THEN 510 

588 IF DC{)=D(3) AND Пс 12-004) THEN 618 

588 IF DC2)=DC3) AND DC2)=D(4) THEN 818 

599 IF G<>0 THEN 620 

581 VA=VA-.25: PRINT"HINBDDIMSBRRRREBPBBI'VA:: GOSUB 850: GOTO 55 
592 PRINT "TI GAGNES 100 PIECES!"SPC(6)"@5 DOLLARS":FORT=1TOSODO:NEXT 
593 FOR T-1 TO 500: NEXT: POKE 53280,0: POKE 53281,11: FOR T-1 TO 100@:NEXT 
594 PRINT'APPUIE UNE TOUCHE"; 

595 GET ñ$: IF A$="" THEN 592 

597 PRINT'"LEKALCUL DES PROBABILITES" 

598 PRINT "#i/4 ж 1/4 ж 1/4 x 1/4 = 1/8565" 

599 PRINT"HEHDONC 1 CHANCE SUR 2588 D'AVOIR 4 CARTES 

608 PRINT"ZET 16 CHANCES SUR 256M D'OBTENIR UN COUP GRATUIT." 

601 PRINT"NMIL FAUT DEPENSER 249 (856-18) PIECES DE 25 CENTS POUR" 
E82 PRINT'ZAVOIR UNE CHANCE DE GAGNER 188 PIECES." 

603 РБІМТ"ШСЕ QUI FAIT ENVIRON 40% DES PIECES 

804 PRINT'RETOURNEES AUX CONSOMMATEURS ДЕТ 60X% POUR LE PATRON'! 
605 РЮІМТ"ШФЫМ CONSEIL": PRINT'ARRETE-TOI L&!":END 

618 G-G«8 

620 G-G-1:PRINT"HCOUPC 5) GRATUIT(S)"G:GOTOSS 

6580 IF VA=.75 THEN PRINT" ": RETURN 

655 IF VR-0 THEN PRINT "IH. OA": END 

860 LT=LEN STR#C VADD: LESLEMCSTRS& INTCVA)22: IF VAC1 THEN LE-1 

670 IF LT-LE-8 THEN PRINT" I2" 

875 IF LT-LE-8 THEN РКІМТ"Щ. 00" 

680 RETURN 

ваа DATA "Ф", "фи, "ен, "v g", nen nan nan 

810 DATA "Ф", "а", "e", "er "an, "e", o n nen 


La ligne 1 n'est pas obligatoire. Cependant, la 
déclaration DIM С%(4,4) fera déplacer le pointeur de "fin de 
tableau" pour libérer 288 mémoires! D'où provient cette 


économie de 288 octets? 


S Les lignes 10 à 30 mettent les 16 chaînes de 
s (inscrites dans les "DATA") dans un tableau à 2 
dimensions, i. ес ОІМ C ` le Có4 réservera š X 5 = 
25 emplacemen (noires pour ton tableau (О à 4 = 5 pour 
chaque dimension). Etant donné que chaque mémoire d'un tableau 
de chatne de 


2 le C64 utilisera 25 X 


Mais si tu ne mets pas l'instruction DIM, ie Có4 réservera 
automatiquement 11 (О à 10) mémoires pour chaque dimension. Ce 
qui f Іх dos 1 ес del WS |o X63 octets. Donc en 
mettant DIM C£(4,4) tu économises 3 = 75 = 288 octets! 


179. 


АММЕХЕ 
Les 3 exercices ci-dessous et l'explication (4-) ont été 
oubliés pendant La transcription de ce volume 1: 

EXERCICE 14-В (Voir page 93) Utilise la fonction SFC ) pour 
écrire 17) 5 (heures,minut secondes) au centre de 
l'écran. | эб Car tères en constraste inversé, 

aractères de commande Nos 1,2 page 335) 


TL 


ig PRODI SW : 
à R———————MECRSR gauche 6 fois) 


EXERCICE 51-В (Voir page 100) Remplis l'écran avec 1000 petites 
cases bleues et introduis les caracteres СКОК gau- 
che et INST dans ton programme pour empécher le 

déroulement de l'écran. 


ERT TI S 
18 FüR ізі Tü 1498 
] Е / 4 THEN FRIMTCHREEZS13?CHREZ]dGÓES 


EXERCICE 32-B (Voir p.100)Utilise la fonction РЕЕК pour déceler 
la collision d'une étoile qui se déplace de haut en 
bas sur une ligne oblique et une planète qui se 
déplace horizontalement de gauche à droite sur une 
rangée choisie au hasard (3 choix). 


Езі? 


ТІ 


TUR ` 
FOR Tei TÜ 
— 


GSINEXT: ani 


Tei 


4= (Voir p. 175) Comment obtenir le caractère de COMMANDE 
(No 9? p.35: 
a) Commence par ouvrir et fermer des guillemets. 
b) Flace le curseur sur le guillemet de droite et appuie 
SHIFT et INST pour éloigner Les bas Co MEE Coo СЫР 
с) Appuie DEL (sans SHIFT) et le caractère apparaftra. 


[MOT de Та РІМ] Les 180 pages réservées pour ce volume 1 sont 
déjà remplies! Le volume 2 te fera. entrer dans le monde 
fascinant de la haute résolution, la programmation des 
caractères, les fichiers, l'écoute du monde extérieur (modem, 
morse), le TRI (Shell, à bulles), le langage machine! 

AUREVOIR et tache de bien maftriser ces 180 pages d'initiation! 
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LES TABLEAUX: ой sont-ils? Voir pages 1 et 2. 


Les 7 COMMANDES: CONT p.72: LIST p.24; LOAD p.27; NEW p.27 
2 SAVE р.27; VERIFY p.27 


Les 23 INSTRUCTIONS: CLR vol.2: DATA p.100 à 103; DEF FN p.167 
et 169; DIM p.149; END p.125; 
FOR...TO...STEP р.40%41%129%150; GET p.45: 
GOSUB p.140-141; GOTO p.17: IF...THEN р.41; 
INPUT p.125 à 128; LET p.83; NEXT p.40; 
ON p.152; РОКЕ p.237 à 59; PRINT p.13 à 16; 
READ p.100 à 102; REM p.80; 
RESTORE p.100 à 105; RETURN р. 140+141; 
STOP p.135; SYS vol.2; WAIT p.171. 


Les 28 FONCTIONS: ABS : ASC p.95; АТМ p.166: CHR$ p.95 à 


„166; EXP vol.2; FRE p.92; 


QS 

INT LEFT$ p.172 à 175: LEN p. 1:9; 
LOG MID$ p.172 à 175; PEEK p.98+99: 
POS vol.2; RIGHT$ p.172 à 175; 


RND p.144 à 148; SGN vol.2; SIN p.166; 

SPC p.92; SOR p. 133+134; STATUS (ST) vol.2; 
STR$ p.129; TAB p.93494; TAN p.166; 

TIME (TI) p.66; TIMES (TI) p.66; 

USR vol.2; VAL p. 139. 


INDEX de quelques-unes des NOTIONS étudiées dans ce volume: 
Algorithme p. 1214124138 
Boucles imbriquées p. 127-130 
Calcul binaire p. 50 à 52 
Couleurs du cadre et du fond l'écran р. 82 
Didacticiel р. 152 
Entrées clavier p. 164+165 
Mode texte p. 177 
Opérateurs arithmétiques p.150 
Opérateurs relationnels ou comparatifs (il y en a 6) p. 4Z 
Sprite  --définition et dessin p. 8+9 

T-en mémoire et à l'écran p. 50 à 56 
Synthétiseur: SON/MUSIQUE р. 104 à 117 
Tableaux  --à 1 dimension (ou liste) p. 150 

з-а 2 dimensions (ou matrice) p. 161 

Tracé de 1а courbe représentative d'une fonction p. 169-4170 
Variables chaînes de caractères р. 44 
Variables entières р. 1652 


Nous serons heureux de recevoir les commentaires, 
suggestions, remarques, corrections... que tu auras la 
gentillesse de nous adresser: 

LAURIAN PICARD, COLLEGE D'ARTHABASKA, 905 BOIS-FRANCS SUD, 
ARTHABASKA, GAP 5W1 ou 2648 MOREAU, MONTREAL, HiW 2M8 
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Our goal iS (о/ргезегуе classic Video дате magazines so that 
they are not lost permanently 


People Interested іп helping Out іп any capacity: 
please visit 05 at retromags. com. 


No profitis made from these scans, nor do we offer anything 
available from the publishers themselves: 


Ifyou come across anyone Selling releases from 
this Site please do not support them and do let Us know: 


Thank you! 


